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1 . 0 INTRODUCTION 



TISA, the Time Independent Spectrum Acquisition program, acquires asynchron- 
ous data from interfaced instruments, displays that data on the scope and 
stores it on LINCtape. TISA is compatible with any instrument that transmits 
X-Y data at rates that do not exceed 2 milliseconds/point and is capable of 
acquiring data simultaneously from five instruments. The number of data 
points that TISA can accept depends on the core size of the PDP-12A being 
used; the maximum number is 512 points for a 4K machine, 4 608 for an 8K 
machine, and 29,184 for a 32K machine. 

The external asynchronous instrument must be interfaced to the PDP-12 by 
either two potentiometers or one shaft encoder and one potentiometer, such 
that one input transmits X-axis data (independent variable) , and the other 
transmits Y-axis data (dependent variable) . For a given instrument TISA 
will generate the function Y=f (X) . Thus, a typical application for TISA is 
generating a series of absorption spectra from infra-red spectrophotometers. 

Concepts and terminology peculiar to this manual are defined in the glossary 
(refer to section 11). 

2 . 0 MINIMUM REQUIREMENTS 

a. PDP-12A with 4K of core 1 and KW12A clock. 

2 

b. LAP6-DIAL (version 2) tape with the TISA program. 

3.0 OPERATING PROCEDURE 

3 . 1 Loading TISA 

TISA is a "load and go" program and is called from tape by the DIAL command 
-*LO TISA, unit-*) 

where unit is the tape unit with the TISA tape. The initial starting address 
is 4001; the restart address is 4020. 

To obtain correct results, the X-Y inputs for an interfaced instrument must 
be connected as described in section 8.0, PIN ASSIGNMENTS. 

For a data buffer of reasonable length, 8K of core is suggested. 

2 

LAP6-DIAL is hereafter referred to as DIAL. 
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3 . 2 O perating Modes 



TISA has three modes of operation: 

a. Setup mode - experiment parameters are defined 

b. A/D mode - data is being acquired 

c. Pause mode - no data is being acquired 

When setup mode is terminated, TISA automatically enters pause mode and the 
data buffer display is activated. Any of the available commands may be is- 
sued at this time (refer to section 5.0). 

3 . 3 Sense Switch 0 Options 

Sense Switch 0 (SSW0) is used in all three operating modes. 
In the setup mode, its settings and effects are: 

Value Effect 

0 none 

1 erase all previous parameter 
input and initialize setup mode 

Note that SSW0 is active during all of setup mode and that all user input 
is ignored when SSWj0=l. The only function of SSW0 during setup mode is 
to allow the user to restart parameter input from the beginning if he dis- 
covers an input error from which he cannot recover. During setup mode, 
raising and lowering SSWJ0 performs the same function as the following re- 
start procedure, which may also be used: 

1. Raise and 1 ower the STOP switch 

2. Set the mode switch to LINC 

3. Depress the I/O PRESET switch 

4. Depress the START 20 switch 

During pause and A/D modes, the SSWj0 settings and effects are 

Value Effect 

0 display data buffer 

1 display HELP frame 

Raising SSW0 during A/D mode has no effect on data acquisition. 
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Knobs 0 and 4 provide flexibility for user control of the data buffer dis- 
play. 



Knob Movement 



Effect 



KNOB 0 



Clockwise from 
center position 



Move window forward; the 
farther away from center 
position, the faster the 
motion . 



Counterclockwise 
from center position 



Move window backward; the 
farther away from center 
position, the faster the 
motion. 



Center position 



Freeze window. 



KNOB 4 



Clockwise 



Move cursor toward the 
right side of the scope. 



Counterclockwise 



Move cursor toward the 
left side of the scope. 



4. 0 SETUP MODE 

4 . 1 Using Setup Mode 

Setup mode allows the user to define his particular experimental parameters, 
such as number of instruments, sampling frequency, etc., by displaying a 
series of scope messages. The user responds by typing the appropriate 
characters on the keyboard. 

In setup mode, all scope messages are presented using the QANDA subroutine; 
the user must be familiar with the operating procedures of QANDA. Refer 
to DEC- 12-FISA-D for a detailed explanation of QANDA. The following ex- 
planation deals only with those conventions that are peculiar to TISA. 

Setup mode is initialized by any of the following: 

1. Loading TISA from DIAL (refer to section 3.1) 

2. Raising SSV10 during setup mode (refer to section 3.3) 

3. Typing "S" during pause mode (refer to section 5.7) 

4. Restarting at 4020 (refer to section 3.3) 

When responding to any of the following messages, an unfilled blank is in- 
terpreted as a zero; leading zeros are ignored. Thus, a response of 1 _ 



is identical to a response of 001, _ is 0000. Note that all messages 

must be answered and terminated according to QANDA conventions except where 
noted. TISA does not interrogate any user reply until a terminator is 
typed. 

4 . 2 Message 1 

Initializing setup mode clears the data buffers (fills them with zeros) 
and displays the following message: 

PARAMETER INPUT 
DO 

1 LINCTAPE 

2 KEYBOARD 

Be usre that SSW0=j3 now or all further keyboard input will be ignored. 
TISA alerts the user that SSW0=1 by causing message 1 to flicker. 

Type 1 to select option 1, LINCtape, or type 2 to select option 2, keyboard. 
A response other than 1 or 2 and a terminator will redisplay the message. 

Option 1 allows the user to recall from LINCtape a parameter list for a 
given experiment that was previously saved using the WRITE command in the 
HELP frame (refer to section 5.8). If option 1 is chosen, the following 
message is displayed: 

READ TBLK 
UNIT 

Type the tape block and unit numbers that contain the desired parameter 
list, followed by a terminator. Only octal values are legal; nonoctal 
input will redisplay the read message. The user must know where his 
parameter list is stored; TISA has no file handling capabilities. After 
the tape block and unit have been specified, TISA tries to read in that 
parameter list. If the requested tape block contains a previously defined 
parameter list, setup mode is terminated and pause mode is entered. If 
the read message is redisplayed after TISA has read in the requested tape 
block, an illegal TBLK, i.e., one that does not contain a parameter list, 
has been specified. It is possible to 'request an illegal tape block that 
will not be caught. Because TISA cannot check for all possible errors, 
running TISA under such conditions could produce weird results. The user 
i:.; cautioned to know the location of a stored parameter list. 
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Option 2 requires parameter input from the keyboard and will advance to 
message 2 for definition of each instrument. 

4 . 3 Message 2 

Message 2 requests information defining the parameters for a particular 
instrument. The message has the following format: 

INSTRUMENT K IS ' _ 

(1 = analog, 2 = encoded) 

STARTING POINT=_ 

TOTAL POINTS= 

SAMPLING FREQUENCY^ 

TISA will support up to five instruments,, each of which must be defined 
in message 2. In the above display , K is the number of the instrument 
currently being defined and is always in the range J0-4. For example, the 
first instrument defined in message 2 would be displayed as: 

INSTRUMENT 0 is'_ 

Four error conditions described below may be detected and noted by TISA 
when the values for message 2 are supplied. 

All input to message 2 must be decimal; non-decimal input for any of the 
four responses will redisplay message 2. If TISA first detects any of 
the error conditions described below, the appropriate error message is 
displayed. An error in defining an instrument has no effect on the para- 
meter input for a previously defined instrument; thus, if instruments 0 
and 1 have been defined successfully but. an error, such as non-decimal 
input, occurs in defining instrument 2, message 2 is redisplayed for 
instrument 2 and the parameter definitions for instruments 0 and 1 remain 
unchanged. Note that if an error in the definition of instrument 1 is 
detected by the user while defining instrument 2, it can be corrected only 
by raising SSW.0 and starting with message 1 again. 

The only legal values for the first response in message 2 are 1 for an 
analog instrument or 2 for an encoded instrument. Any other response 
will redisplay message 2. 

TISA will support a maximum of three encoded instruments. If an attempt 
is made to define more than three instruments, the message 

ERR ENC 
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is displayed and message 2 is redisplayed for the offending instrument when 
the error message is terminated. 

The response for STARTING POINT can be any decimal number up to five digits 
long, i.e. 0-99999, and is the value of the initial X coordinate in the 
data buffer display routines (see DATA BUFFER DISPLAY, section 9.0). 

TOTAL POINTS is the number of points that TISA will acquire and store in 
its data buffers, as distinguished from a detected point as described in 
SAMPLING FREQUENCY be low. 

The response for TOTAL POINTS for any instrument must be a number greater 
than 0 and less than or equal to the number of points left in the data 
buffer, which is the maximum number of points available minus the number 
that has been allotted to previously defined instruments. The maximum 
number of points available depends upon the amount of core in the system 
configuration, according to the following scheme: 

AMOUNT OF MAXIMUM NUMBER OF 

PDP-12 CORE DATA POINTS AVAILABLE 



4K 


512 


8K 


4608 


12K 


8704 


16K 


12800 


2j2fK 


16896 


24K 


20992 


28K 


25088 


32K 


29184 



Thus, if instruments 0 and 1 are defined as having 608 and 1000 points, 
respectively, for an 8K machine, the maximum number of points available 
for instrument 2 is 4608 minus 608 for instrument 0 and 1000 for instru- 
ment I, or 3000 points for instrument 2. 

If the user requests no points, the error message 

ERR 0 PTS 

is displayed . 

If more points are requested than there are left, i.e. the capacity of 
the data buffer is exceeded, the error message 

ERR BUF FULL 
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is displayed. 

Terminating either error message reinitializes message 2 for the offending 
instrument. 

The SAMPLING FREQUENCY determines the density or resolution of the spectrum. 
The X axis input is considered as a pulse,. For an analog device a pulse is 
a one bit increment of an analog channel; for an encoded device a pulse is 
an interrupt on one of the KW12A clock channels. A point is said to be de- 
tected on the Y axis whenever TISA receives a pulse on the X axis. The ratio 
of detected points to acquired points is defined as the SAMPLING FREQUENCY. 
If the user defines TOTAL POINTS to be 1000 and the SAMPLING FREQUENCY to 
be 5, TISA will detect 5000 points and every fifth detected point will be 
an acquired point. SAMPLING FREQUENCIES of 0 or 1 mean acquire every detec- 
ted point, a SAMPLING FREQUENCY of 2 moms acquire every second detected 
point, etc. 

The SAMPLING FREQUENCY must be a number from 0 to 10. Requested sampling 
frequencies outside of this range display the error message 



Terminate this error message; message 2 is reinitialized. 
4 . 4 Message 3 

When an instrument's parameter definition has been successfully completed 
in message 2, TISA displays the following message: 



Type 1 to redisplay message 2 to define more instruments. TISA will 
redisplay message 2 with the instrument identifier (the K of message 2) 
incremented by one. Each instrument is defined in turn in this manner 
until option 2 of message 3 is selected. Type 2 if all the instruments 
in this experiment have been defined. Pause mode is entered immediately 
after typing 2. Terminating message 3 with a response other than 1 or 
2 is illegal and redisplays message 3. 

If option 1 is selected/ there are two possible error messages that may be 
displayed. If the user attempts to define more than five instruments, 
the error message 



ERR FREQ 



1 

2 



D0'_ 

MORE INSTRUMENTS 
START 



ERR 



INST 
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is displayed. If the user attempts to define additional instruments when 
all the data storage has been allotted to previously defined instruments, the 
following error message is displayed: 

ERR BUF FULL 

Terminate either error message display; message 3 is then redisplayed. 



5.0 HELP FRAME AND KEYBOARD COMMANDS 

When the user is in either pause or A/D mode and SSW0=1, a HELP frame is 
displayed that briefly summarizes all keyboard commands available to the 
user in either of these modes. The HELP frame display is: 



A/D 



DIAL 
MODE 



CTRL/H 

HN 

P 

F 

PAUSE MODE 
GN 
S 
W 

c 

M 
L 
P 
F 



HALT ALL INSTRUMENTS 
HALT INSTRUMENT N 
POLARITY 
FREEZE 

GO INSTRUMENT N 
SETUP 

WRITE TAPE 

CATACAL 

MAGSPY 

LOADER 

POLARITY 

FREEZE 



All commands are issued by typing the letter (s) and then their action is 
implemented immediately. 

5.1 DIAL 



The D command is active in either mode and is used to restart DIAL, 
to the LAP 6- DIAL Programmer * s Reference Manual, DEC-12-SE2B-D. 



Refer 



5 . 2 Halt All Instruments 

Typing CTRL/H 1 when in A/D mode directs TISA to halt all instruments; data 
acquisition is terminated on all instruments and TISA enters pause mode. 
Whenever TISA enters pause mode, the messages: 

PAUSE MODE 



is printed on the Teletype. 



CTRL/H is typed by pressing down the CTRL (control) key and simultaneously 
typing H, in the same manner as using the SHIFT key. 
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5.3 Halt Instrument n 



UN is a two character command that allows the user to halt a given instrument 
(put it into pause mode) without affecting the mode status of the other 
defined instruments. The first character of the command is H (for halt) ; 
the second character, n, is a number in the range 0-4 and defines the number 
assigned to the instrument in message 2. Thus, the command H2 means halt in- 
strument 2. Any number of intervening characters may be typed between H and 
N, the numeric argument, without interfering with the execution of the command 
HN, except for the character G. Thus, the command HAAA777BBB2 is identical 
to the command H2 because the nine intervening characters are illegal and 
ignored by TISA. The command H666PPP???2 directs TISA to halt instrument 2, 
but it is not identical to the command H2 because it executes the polarity 
command P (refer to section 5.4) three times before instrument 2 is halted. 
An HN command is acknowledged by the following message printed on the Teletype: 

HALT INSTRUMENT N 

where N is the user supplied value J0-4. If the HN command is typed for an 
instrument that has not been defined by the user or for an instrument that 
is in pause mode, it is ignored. 

5 . 4 Polarize Display 

Typing P polarizes or inverts the entire data buffer display. For example: 



BEFORE P AFTER P 

COMMAND COMMAND 




The P command does not destroy the integrity of the data in the data buffer 
but merely inverts it before it is displayed on the scope. If the data 
buffer is polarized when one P command has already been issued, the display 
is restored to its normal form. If the P command causes the display to be 
inverted, TISA responds with the Teletype message: 

INVERTED 

If the P command causes the display to be normalized, TISA outputs the 
message : 

NORMAL 
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The P command can be issued as often and whenever the user chooses. 

5 . 5 Freeze 

The F command directs TISA to freeze the moving window display (see DATA 
BUFFER DISPLAY, section 9.0), thereby isolating the display on a given 
portion of the data buffer. Typing F when the window is frozen directs TISA 
to restart window motion. TISA acknowledges the F command and indicates the 
action taken by typing FREEZE or MOTION, whichever is appropriate. The user 
may issue the F command as often as he likes. 

The P and F commands are active in both pause and A/D modes . 

5 . 6 Go Instrument n 

GN is a two character command issued in the same manner as UN (refer to 
section 5.3), but performs the opposite function; GN puts an instrument 
in A/D mode. Remember that arguments H and G cannot be intermixed in a 
command. For example, typing H followed by G erases the first half of an 
HN command and directs TISA to wait for the second argument of a GN command. 
Thus, the commands HG2 , HHHHHG2, and G2 are all identical. If instrument 
N is in A/D mode, TISA will ignore the command GN. 

When TISA initiates A/D mode for a given instrument, the message 

GO INSTRUMENT N 

is printed on the Teletype, where N is the instrument number 0-4. Whenever 
TISA enters A/D mode it outputs the following message on the Teletype: 

A/D MODE 

5 . 7 Setup Mode 

Typing the key S causes TISA to enter setup mode so a new parameter list 
can be input. The contents of the data buffer are not preserved. 

5. 8 Write 

The W command outputs the data buffers to LINCtape. TISA acknowledges 
this command by displaying the following message: 

EXPERIMENT NAME 
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The user can name his experiment with any combination of up to eight charac- 
ters; input acceptable to QANDA is legitimate here. 

The Write command will generate 2+K TBLKs of output where K is the smallest 
number of tape blocks needed to store the portion of the data defined by the 
experiment. If the user had defined 1000 points of the data buffer area, 
then K is equal to four. The first two blocks contain the experiment name 
and the parameter list for the experiment just completed; they contain no 
data but enable the user to exercise the LINCtape input option during setup 
mode (refer to section 4.2). The experiment name will appear in the begin- 
ning of the first block of output exactly as it is typed in the name message 
above. For example, if the first block of output is assigned the name 

ABCD_ 

1 

then this block when viewed via MAGSPY will appear as follows: 

A B C D _ _ 

$%ASJWBE*996%RYSSI&4 56%&J 

After the name message, TISA displays the following Write message: 

WRITE XYZ (OCT) TBLKS 

FIRST TBLK= '__ 

UNIT 

where XYZ is the number of octal tape blocks that will be output and is the 
number 2+K described above. The user specifies in octal the starting TBLK 
and unit number; a non-octal response redisplays the name message. If the 
response to the Write message is legitimate, TISA commences to write the data 
buffer plus the two header blocks. While writing, the display is maintained; 
however, all commands are ignored until this operation is finished. When the 
interrupt (ION) light comes on, the operation is finished. If this parameter 
list just output is ever to be recalled, remember the first TBLK specified 
in the Write message because it is this block that option 1 of message 1 
(refer to section 4.2) requires. (This block number may also be determined 
using the MAGSPY program. ) Note that TISA considers TBLK 777 to be contigu- 
ous to TBLK 000. For example, if a request is made to write 20 TBLKs start- 
ing at TBLK 770, the first 10 TBLKs are written on 770-777 and the last 10 
TBLKs on 0-7. Data should not be output in this manner, however, because of 
difficulties created for related software, such as MAGS PY 1 . 



MAGSPY is a program used to examine data stored on LINCtape. Refer to 
DEC- 12-UZSA-D and section 5.10.. 
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5 . 9 CATACAL 



Typing C exits TISA and loads the program CATACAL which is very useful for 
data manipulation. Refer to DEC-12-UW1A-D for a description of CATACAL. 

5.10 MAGSPY 

Typing M exits TISA and loads the program MAGSPY. 

The CATACAL and MAGSPY commands both assume that a DIAL-V2 tape (not 
DIAL-MS) with the binary files CATACAL and MAGSPY are on unit 0. If the 
binary files are not present, the user will find himself in DIAL with 
the NO message on the scope. If a DIAL- V2 tape is not on unit 0, the 
results are unpredictable. 

5.11 Load 

TISA can load an arbitrary program by issuing the command L. A DIAL V2 
tape must be on unit 0. The following load message is displayed: 

LOAD 1 _ 
UNIT _ 

Type at least one character for the program name in acceptable QANDA 
characters and then type the unit where this program is located. No 
error checking is done for the unit argument; thus, if the user requests 
unit A, he gets unit l,etc. If the requested binary is a file on the 
requested unit, TISA will load it. If the file does not exist, the user 
will find himself in DIAL with the NO message on the scope. 

5.12 Polari ze 

The P command in pause mode is identical to the P command, Polarize, in 
A/D mode (refer to section 5.4). 

5.13 Freeze 

The F command in pause mode is identical to the F command, Freeze, in A/D 
mode (refer to section 5.5). 

6.0 TELETYPE USAGE 

TISA outputs messages to the Teletype to make the user aware of the 
present action. The following set of messages are in TISA's repertoire: 
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HALT INSTRUMENT N (N=jEf-4) 

GO INSTRUMENT N (N=j2f-4) 

MOTION 

FREEZE 

NORMAL 

INVERTED 

PAUSE MODE 

A/D MODE 

HANDS OFF 

A backlog of several messages may occur because the Teletype is a relatively 
slow device for TISA's environment. TISA services legal keyboard commands 
immediately; the message (s) appropriate to the command(s) , however, is 
typed afterward. If a command is issued while a message is being typed, 
the command is executed immediately and the message (s) appropriate to the 
command is put on TISA's backlog. TISA will never overload the Teletype 
but the user may do so by leaning on the P key. In this case, the integrity 
of the messages printed on the Teletype may be destroyed, but execution of the 
keyboard commands is maintained. If the Teletype becomes too overloaded with 
commands, the message HANDS OFF is printed. 

7. 0 DATA ACQUISITION 

TISA has the ability to acquire data simultaneously from five instruments. 
A given device must not transmit X axis data at rates that are faster than 
2 milliseconds/point or data will be lost. If all instruments (maximum of 3) 
are defined as encoded, the optimum rate obeys the following scheme: 

NO. OF ENCODED OPTIMUM 
INSTRUMENT RATE 

1 500 ys 

2 1000 ys 

3 1500 ys 

For analog devices , a one bit increment in the X axis potentiometer indicates 
to TISA that a point has been detected on the Y axis. For encoded devices, 
an interrupt on a KW12A clock channel (X axis input) indicates a detected 
point. The data that TISA acquires comes from the Y axis input. Each data 
point represents a 10 bit A/D conversion on one of the Y axis analog inputs, 
and is stored as a 10 bit single precision word. Each defined instrument is 
assigned a sector of contiguous core locations in the data buffer area, 
beginning at location 1000 of PDP-8 field 0 and continuing to the last loca- 
tion of the last PDP-8 field. The data sectors for each instrument are ad- 
jacent to one another; there are no data gaps between instrument data sectors. 
The data sector for instrument 0 always begins at the initial PDP-8 data 
buffer location (07000). For example, if the user defined TOTAL POINTS for 
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instruments 0, 1, and 2 to be 512, 2000, and 3 (Ij0j2fjp, 3720 , 3 octal), res- 
pectively, then the allocation in the data area for an 8K of core configura- 
tion is: 

DATA BUFFER ALLOCATION 
INSTRUMENT FROM TO 

0 0 1000 0 1111 

1 1 0000 1 3717 

2 1 3720 1 3722 
(1 3723 to 1 7777 is unused) 

TISA starts acquiring data from an instrument upon receiving a Go command 
(refer to section 5.6). No action is taken on an instrument until the 
first pulse is received from the X axis. TISA does not require the data 
to be input in a periodic or time dependent fashion; pulses can be days 
or milliseconds apart. 

TISA will acquire data from an instrument until any one of the following 
conditions occurs: 

1. the requested number (TOTAL POINTS) of points has 
been acquired 

2. the user halts the instrument from the keyboard 

3. the X axis potentiometer (analog instruments only) 
decreases 20 bits from its last value read 

Conditions 1 and 3 represent internal instrument halts. If a halt message 
is printed on the Teletype and the halt was not requested by the user from 
the keyboard, then the instrument halt was internal. All three conditions 
cease data acquisition for the given instrument and an appropriate message 
is printed on the Teletype. 

8. 0 PIN ASSIGNMENTS 

There is only one correct way to connect the X-Y inputs from an instrument 
to the PDP-12, regardless of the particular system configuration. Let 
instrument K be the Kth instrument defined during setup mode for K=J0 , 1 , 2 , 3 , 4 
and let be the number of analog instruments that were defined previous 
to instrument K. The X-Y inputs must then obey the following rules: 

1. If instrument K is analog, its X axis input is connected 
to analog channel 1J2+K for K<4. If K=4, the input is con- 
nected to analog channel 20. 



The fifth channel requires the analog extension (channels 20-27) which is 
not standard PDP-12 hardware. 



2. If instrument K is encoded, its X axis input is connected 



to clock channel 1+K-N^. 



3. 



The Y axis input for instrument K is analog channel 14+K 
for K<4« For K=4, the input is connected to analog chan- 
nel 24. 



Consider, for example, the following configuration: 



CLOCK 




INST 
2 



INST 
1 



GENERAL CONFIGURATION 



CLOCK 



X AXIS 




The fifth channel requires the analog extension (channels 20-27) which is 
not standard PDP-12 hardware. 

15 



X AXIS 



ANALOG 
10 14 



11 15 



12 16 



13 17 





20 24 












INST 3 



INST 4 



Y AXIS 



INST 

0 

1 
2 
3 



INST TYPE 

ANALOG 
ENCODED 
ANALOG 
ENCODED 



X AXIS 

ANCH 10 
CLOCK 1 
ANCH 12 
CLOCK 2 



Y AXIS 

ANCH 14 

ANCH 15 

ANCH 16 

ANCH 17 



9.0 DATA BUFFER DISPLAY 

The data buffer display has the three following features: 

1. A moving window display controlled by A/D Knob 0 and 
the keyboard 

2. A cursor superimposed on the data buffer display and 
controlled by A/D Knob 4 

3. X-Y decimal coordinate display of cursor position 

The 10 bit values in the data buffer are scaled to 9 bits prior to display 
to prevent scope "wrap-around." 

9 . 1 Moving Window 



fi.cciuse the scope can display a maximum of 512 points at any one time and 
the data buffer has a maximum capacity of 29,184 points, the moving window 
display is used to view any 512 contiguous points of the data buffer, start- 
ing at any given point, simply by rotating A/D Knob 0. The moving window is 
very similar to that used in MAGSPY. Consider the data buffer as a ring 
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located behind the VR12 scope, with the initial and terminal data points 
being contiguous, that can be turned by a wheel, namely, A/D knob 0 ; the scope 
the window. (The phrase moving window is actually a misnomer because it 
is the data buffer that moves.) When knob 0 is in its center position, 
the display is stationary. 

When A/D knob 0 is moved clockwise from the center position, the data 
buffer (the ring) appears to move from right to left across the scope. 
The velocity of the moving window increases with the clockwise movement 
of A/D' knob 0 from the center position. The exact opposite occurs for 
counterclockwise movement of A/D knob 0. The data buffer appears to be 
moving from left to right across the scope. When the display is frozen 
under the keyboard command F, knob 0 has no effect. When TISA enters pause 
mode for the first time (after being loaded from LINCtape) , the display is 
frozen and the leftmost scope point is the first point for instrument 0. 

9 . 2 Cursor Display 

A cursor is superimposed upon the data buffer display and can be positioned 
over any of the 512 points in the display by rotating A/D knob 4 If knob 
4 is moved to its furthermost counterclockwise (leftmost) position, the 
cursor will be imposed on the leftmost point of the scope display. Similarly, 
if knob 4 is positioned to its furthermost clockwise (rightmost) position, 
the cursor will be imposed upon the rightmost scope data point. Interven- 
ing knob positions will yield intervening cursor positions. The cursor ap- 
pears on the scope as a vertical line ( J ) and normally "sits" on top of 
the display point. However, for those cursor points that do not allow enough 
room at the top of the scope for the cursor to sit comfortably, the cursor 
is displayed beneath the cursor point as the following example shows. 

)R 
1 
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It should be noted that knob 0" has no control over the position of the 
cursor relative to the scope. If the window is frozen and the cursor is I 
inches from the left side of the scope, the cursor will remain fixed at I 
inches from the left of the scope if the window movement is started. The 
relationship of the cursor to the data buffer, however, changes because 
the data buffer is moving across the scope. 

9 . 3 X-Y Coordinates 

If the cursor is sitting on a defined portion of the data buffer, its X-Y 
coordinate position is displayed on the scope in the following manner: 



X=X,X n X 



Y=Y 1 Y 2 Y 3 




Both X and Y are non-negative decimal integers; the range for X is 0- 
391829; the range for Y is 0-511. Leading zeros and the point 00000 are 
not displayed. If both the X and Y coordinates are 0, the coordinates 
are displayed as: 

X= 
Y= 

If the cursor is positioned over an undefined portion of the data buffer, 
the X-Y coordinates are not displayed at all. The Y coordinate reads the 
amplitude (height) of the cursor', the value 0 is the bottom of the scope 
and the value 511 is the top of the scope. 

The value of the X-coordinate depends upon the cursor's absolute position 
within the data buffer and the starting points and sampling frequencies 
assigned by the user during setup mode. Each instrument was assigned a 
sector of the data buffer after replying to TOTAL POINTS in message 2 

(refer to section 4.3). When the STARTING POINT value was input, an 
initial X coordinate to the first data point of the data sector for 

that instrument was assigned. 

Consider the case where the sampling frequency is 1, the STARTING POINT is 
9000 for instrument K, and the cursor is positioned over the initial data 
point of the data sector for the instrument K. If the cursor is moved 
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from left to right with the window frozen and the cursor at the far 
left of the scope, the X coordinate will read successively: 

9000, 9001, , 9009, 9010, , 9510, 9511 

assuming TOTAL POINTS is greater than 511. Because the STARTING POINT 
(initial X coordinate) is arbitrary and data sectors are adjacent to one 
another in the data buffer, it is not unusual for the X coordinate to 
jump as the cursor crosses data sectors. Suppose the user defined TOTAL 
P0INTS=1 for instruments 0, 1, and 2 and STARTING POINTS=9000 , 5, and 47311, 
respectively. If the cursor is positioned over the first (and last) data 
point for instrument 0 and moved from left to right, the X coordinate will 
read respectively (and discontinuously ) : 

9000,5,47311 

As long as the cursor stays within a data sector and moves forward across 
it via A/D Knob 0 or 4 or both, the X coordinate will increase in value. 
The difference between any two X coordinates within a data sector for a 
given instrument is the SAMPLING FREQUENCY of that instrument. In the 
same case, if the SAMPLING FREQUENCY is three, then the successive X co- 
ordinate readings are: 

9000, 9003, , 9027, 9030, , 10530, 10533 

For a SAMPLING FREQUENCY of 10, the readings are: 

9000, 9010, , 9090, 9100, , 14100, 14110 

With a SAMPLING FREQUENCY of 10, the data acquisition routines acquire 1 
point for every 10 detected and they are stored as successive data points 
in the data buffer. This difference, therefore, is reflected in the X co- 
ordinate display. There is no X-Y display over undefined areas of the data 
buffer because there are no arguments (STARTING POINT, etc.) for the X-Y 
display routines to use. The X-Y coordinates are displayed on hardware 
channel 1, and the data buffer is displayed on hardware channel 2. To 
see both displays the channel select knob should be set to the position 
1 & 2. In the event that the data buffer display and X-Y readout overlap, 
they can be viewed separately by selecting the appropriate hardware scope 
channel. 
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OVERLAP CONDITION 




10.0 INSTRUMENT INTERFACE 

TISA plots the incoming data from each of up to five instruments as a dependent 
variable versus an independent variable. The dependent variable, for example 
the intensity at a given frequency for an infra-red spectrophotometer, must be 
an analog signal within the range of the analog-to-digital converter contained in 
the particular PDP-12 . The standard voltage range is -1 volt to +1 volt. 

The independent variable may be a monotonically increasing voltage as shown in 
figure 1 or a pulse train as shown in figure 2. Note that the fastest samplinq 
rate on any and all instruments is 2 milliseconds per point. The maximum slope 
of an analog dependent variable can be found by the following formula: 



, X VOltS 

maximum slope - 



10 samples 2 msec 



where X = voltage range of particular analog-to-digital 
converter system 



For the encoded or pulsed dependent variable the input waveform need only pass 
through the desired threshold whenever an analog sample is required. The 
desired trigger level is set by the threshold knob on the KW12A input panel. The 
threshold knob is not calibrated but the limits are approximately + 6 volts and 
the potentiometer controlled by the threshold knob is approximately linear. The 
slope control defined as shown in figure 2 is also on the KW12A input panel. 
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Figure 1 Monotonically Increasing Voltage 
Voltage range for standard analog to digital converter 
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Figure 2 Pulse Train 
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The setup procedure for instrument N, where N = 0, 1, 2,3, 4, is described in 
section 8.0. The setup procedure details which input channels are to be used. 

Typical analog independent variable sources are retransmitting pots or ramp 
generators while pulsed sources are typically shaft encoders or oscillators. 

Several examples of typical interfaces were tried in the PDP-12 engineering 
laboratory. A Perkin Elmer model 621 infrared spectrophotometer was interfaced 
by placing a retransmitting pot on the pen drive gear and either a retransmitting 
pot or an incremental shaft encoder on the main chart drive gear. In the case 
of the Perkin Elmer instrument, the pickup devices were attached via extra 
chart drive gears supplied with the instrument. The potentiometers were Bourns 
34 00S series devices. The incremental shaft encoder was a Data Technology model 
#C25-100-40 with two one-hundred cycle/turn pulse outputs 90° out of phase. 1 
The two outputs can be used to detect the direction of rotation and/or produce a 
400 cycle/turn output. However, for this application, either of the outputs 
alone was sufficient. 



1 The specification of these part numbers in this manual does not constitute 
DIGITAL EQUIPMENT CORP. sanction or guarantee, but is intended as an aid for 
the user. 



11.0 GLOSSARY 



ACQUIRED POINT 



an acquired point is one that has been retrieved from 
the Y axis of a defined instrument and stored in TISA's 
data buffers (see also SAMPLING FREQUENCY and DETECTED 
POINTS) . 



A/D MODE 

INSTRUMENT 



TISA 



ANALOG INSTRUMENT 



CURSOR 



CURSOR POINT 



DATA BUFFER 



an instrument is said to be in A/D mode (running) when 
TISA is accepting information from its X axis. 

TISA is said to be in A/D mode when at least one of 
its defined instruments is in A/D mode. 

one of two types of instruments that may be interfaced 
to TISA. An instrument is defined as analog if its X 
axis input runs from a potentiometer to a PDP-12A ana- 
log channel. 

a vertical line ( | ) superimposed upon the data buffer 
display and controlled by A/D knob 4. 

that point in the data buffer display upon which the 
cursor is sitting. 

the amount of core available on the PDP-12 that has been 
reserved for acquiring points. The data buffer is a 
function of core size and ranges from 512 to 29,184 
words . 



DATA POINT 



a signed 10 bit single precision A/D conversion or 
word. 



DATA SECTOR 



a contiguous set of core locations in the data buffer 
that has been assigned to a defined instrument. A 
data sector can be anywhere in length from 1 to 29,184 
core locations. 



DEFINED DATA AREA 



the portion of the . data buff er that contains the data 
sectors of all defined instruments. 



DEFINED INSTRUMENT 



DETECTED POINT 



an instrument is defined if it has been assigned a set 
of parameters during setup mode. 

for a given instrument, a point on the Y axis is 
detected if TISA has received a pulse from the cor- 
responding X axis. 
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ENCODED INSTRUMENT 



one of two types of instruments that may be inter- 
faced to TISA. An instrument is defined as encoded 
if its X axis input runs from a shaft encoder to a 
KW12A clock channel . 



HELP FRAME 



INSTRUMENT 



INSTRUMENT K 



a message that can be displayed on the scope when TISA 
is in either pause of A/D mode which briefly summarizes 
the keyboard commands that are available to the user. 

interfaced to TISA for data acquisition. Instruments 
are either analog or encoded, depending upon the man- 
ner in which they are interfaced. 

the Kth instrument defined during setup mode ; 
K = 0,1,2,3,4. 



INTERNAL HALT 



£fab& INSTRUMENT 



an instrument in A/D mode that is halted by a means 
other than by an HN or CTRL/H keyboard command is 
said to have been internally halted. 

the state of an instrument at any point in time or 
the relationship that it bears to TISA is called its 
mode. An instrument is either in A/D mode or pause 
mode. Undefined instruments are in pause mode by 
default. 



TISA 



the state of TISA 1 s operation or its relationship 
to the user at any given point in time is called 
the mode. TISA has three modes : A/D, pause , and 
setup. 



PARAMETER 



PARAMETER LIST 



a numeric value that is used to define an instrument, 
e.g. TOTAL POINTS . 

the set of all parameters for all defined instruments . 



PAUSE MODE 

INSTRUMENT 



TISA 



PULSE 



QANDA 



an instrument is in pause mode whenever TISA is not 
accepting information from its X axis . 

TISA is in pause mode whenever all of its defined 
instruments are in pause mode. 

X axis information transmitted by a defined instrument. 
For an analog instrument, a pulse is a one bit increment 
on the X axis potentiometer . For an encoded instrument , 
it is an interrupt on one of the KW12A clock channels . 

a PDP-12 subroutine that facilitates question and 
answer type of dialogue via the scope and keyboard. 
(Refer to DEC-12-FISA-D.) 



SAMPLING FREQUENCY 



SETUP MODE 



SPECTRUM 



an instrument parameter that is the ratio of DETECTED 
POINTS to ACQUIRED POINTS. SAMPLING FREQUENCY deter- 
mines an acquired spectrum* s resolution. 

TISA is said to be in setup mode when the user is de- 
fining his instruments (messages 1-3 ) . 

the sum total of an instrument' s acquired points is 
called the spectrum of that instrument. 



SSW0 



Sense Switch 0. 



an instrument parameter that defines the initial X 
coordinate for the data buffer display of the first 
data point of the instrument's data sector. 

an abbreviation for LINCtape block. 

an instrument parameter which equals the total number 
of points that TISA will attempt to acquire when the 
instrument is in A/D mode. The length of an instru- 
ment's data sector is equal to its TOTAL POINTS. 

one of twd of an instrument's inputs to TISA that are 
required to generate the instrument's spectrum. The 
X axis input is the independent variable. 

one of two of an instrument's inputs to TISA that 
are required to generate the instrument's spectrum. 
The Y axis input is the dependent variable. 



Appendix A 

Internal Description 



This appendix assumes that the reader is familiar with TISA's external 
characteristics as described in sections 1 through 11 of this manual. 
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A.l INTERRUPT ROUTINES 

The interrupt routines handle interrupts in both modes. In either mode, only 
the following central processor registers are preserved: AC, LINK, PC, IF, and 
DF. The entry and exit routines for P-mode and L-mode interrupts are different 
but the interrupt dispatching is common to both. Interrupts remain off until 
the routines exit. I.e., the interrupt routines can not be interrupted. An L-mode 
interrupt goes to a routine INTL which saves the AC and LINK, sets up a LINKmode 
jump at RTNJMP, aniLDF instruction at RTNLDF and an LIF instruction at RTNLIF, 
and sets the interrupt mode switch (INTMOD) to 0. A P-mode interrupt saves the 
AC, link and sets the interrupt mode switch to 7777, before going to interrupt 
dispatch . 

The interrupt dispatch routines always check three devices in the following 
order: clock, keyboard, and Teletype. If the clock flag is set, the routine 
dispatches a call to the routine TISA for data acquisition. If the keyboard 
flag is up, a character is read in and stored in location KBDBUF. If the Tele- 
type flag is up, it is cleared, then location ADMESS is checked to see if a 
character needs to be typed (C (ADMESS ) NE to 0 means type C(ADMESS)). If a 
character needs to be typed, it is; the location ADMESS is advanced by one; and 
the location TTYFLG is set to C (ADMESS) - non zero - to indicate that the 
Teletype is busy. If no characters need to be typed, then TTYFLG is set to 0 
to indicate that the Teletype is not busy. When all devices have been either 
check or serviced, the AC and link are restored and the INTMOD switch is ISZed 
to implement one of the two following exits: 



P-MODE L-MODE 



RMF LINC 
ION DJR 
JMP I 0 RTNLIF, 0 

RTNLDF , 0 

IOB 
ION 

RTNJMP, 0 



A. 2 DATA ACQUISITION 

When the data acquisition routines are called they check all five devices 
(even if some devices are not defined or not selected) because it takes only 
14.4 microseconds to determine that a device is not selected. The first task 
of the data acquisition routines is to preserve the clock bits by executing: 



CLSA 

DCA STATUS 
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An analog device must be checked whenever there is a clock overflow, not 
because the device is ready but because it might be ready. The only way to 
determine a 1 bit increase of an X-axis analog channel is to read it periodically, 
The clock is set to overflow and causes an interrupt on overflow once every 
two milliseconds. Analog devices, therefore, are checked once every 2 
milliseconds (optimum speed for analog devices under the worst circumstances) . 
An encoded device is checked whenever its clock channel causes an interrupt 
indicating it is ready. Note that encoded devices can run at speeds much faster 
than 2 milliseconds. For instance, TISA could handle one encoded device and 
no others without loss of any data, if the rate of interrupt was faster than 
1/2 millisecond/point. Because the optimum speed varies amonq all possible user 
defined configurations, the upper limit in the user's manual is a worst possible 
c j.se restriction. There are only 4 bit- in the clock status register that are 
of interest to the data acquisition routines: 

1. Clock overflow, bit 0 

2. Interrupt on channel 1, bit 6 

3. Interrupt on channel 2, bit 8 

4. Interrupt on channel 3, bit 10 

Each device has a select word associated to it whose function is to mask 
out all status bits except the one that determines if the device is ready to be 
checked. For example, the select word for an analoq device is 4000. The 
coding that determines if a device needs to be checked is identical for all 
devices. For device K, the coding is: 

TAD STATUS 

AND SELDVK 
SNA 

JMP ( I ) NXTDV 

DCA DVTYP 
JMS I KINPUT 



Devices are deselected by clearing their select words. The select word for an 
undefined device is always 0. Every device has a set of parameters associated 
to it that are required for checking and servicing the device. If a device 
needs to be checked, the subroutine INPUT is called; the parameters for the 
device are directly beneath the call: 



A- 2 



J MS 



I 



KINPUT 
XAXDVK 
YAXDVK 



100 
100 



EHIDVK, 



JMP 



0 

(I) NXTDV 



/END OF LIST 
/CONTINUE RTN 
/HLT RTN 



NXTDV, 



TAD 



STATUS 



The INPUT routine retrieves the parameter list, checks the devices, and 
returns. If the device is to be halted, input returns to the halt return; 
otherwise it returns to the continue return. Each device is checked in an 
identical manner; the last device checked returns to the interrupt dispatch 
routines so that the keyboard and Teletype may also be checked. 

After retrieving the parameter list, INPUT checks the high order bit of 
DVTYP to determine if the device is analog or encoded. DVTYP = 4000 for analog 
and 0XXX for encoded devices. If the device is analog, the routine ANALOG is 
called to check for a 1 bit increment of the X axis. ANALOG samples the X axis 
(NEWSAM) and compares the value read with OLDSAM, which holds the X axis A/D 
value for the last detected point. If NEWSAM is greater than OLDS AM , a point 
has been detected. At this juncture, NEWSAM replaces OLDSAM and ANALOG returns 
in line (ANARTN) for further checking of the device. If ANALOG finds no increase, 
NEWSAM is checked for a 20 bit decrease. If the X axis has dropped 2 0 bits, 
ANALOG exits to the halt return; otherwise, it exits to the continue to next 
device return. For encoded devices or analog devices that make it to ANARTN, 
INPUT advances and checks the detected point counter. When this counter goes 
to zero, a point is ready to be acquired; otherwise, INPUT exits to the continue 



If the device is ready, INPUT resets the detected point counter, sets up 
a 15 bit buffer address (CDF INST and 12 bit address), SAMs the Y axis, stores 
away the value, and resets the field to 0 (CDF0) . INPUT then compares the 



return : 



ISZ I FREQ 
JMP I INPUT 
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current device address to the terminal device address to determine if all points 
have been acquired and, if so, exits to the halt return. If the device is not 
finished, INPUT increments the current address by 1 and exits to the continue 
return. Returning to the halt return affects the values of 2 parameters 
0 is put into SELDVK to deselect and the device number (0-4) is put into HSWITK 
for subsequent use by the routine CHKSWI . 

A . 3 TELETYPE ROUTINES 

The Teletype routines work in conjunction with a que stack capable of hold- 
ing the addresses (of the first character of each message) of twenty messages. 
Messages go on the que via the pointer QUEIN, and come off via the pointer 
QUEOUT; QUECNT always holds the number of untyped messages on the que. The que 
stack is ringed so that the address of message 20 is adjacent to the address 
of message 1. Each message consists of a string of 8 bit ASCII characters 
followed by the message terminator 0000. The subroutine MESCHK takes messages 
off the que, and the subroutine QUPUT puts them on the que. 

A. 3.1 MESCHK 

MESCHK first looks at QUECNT to see if it is zero. When QUECNT is zero, 
there are no more messages waiting to be typed so MESCHK exits in this case. 
Location ADMESS is the pointer to the current message being typed; once ADMESS 
is initialized by MESCHK, it is controlled by the interrupt routines (see above) . 
If QUECNT is non-zero (message waiting) , MESCHK looks at ADMESS (TAD I ADMESS) . 
If the AC is non-zero, a message is in progress and MESCHK exits. If the AC is 
zero, MESCHK must verify that the last character of the message has been typed; 
this is done by checking the location TTYFLG. If TTYFLG is non-zero, the TTY 
is busy and MESCHK exits. If the TTYFLG is zero, MESCHK takes the next message 
off the que: 

TAD I QUEOUT 
DCA ADMESS 

QUEOUT is advanced to the next message; if it is at the end of the que, it is 
reset to the start of the que. The QUECNT is decreased by 1 and the first 
character of the message is typed to initiate the Teletype interrupt routines 
that will finish the message. MESCHK then exits. 

A. 3. 2 QUPUT 

When QUPUT is called, the address of the message is in the AC. QUPUT saves 
the message in QSAVE and checks QUECNT to see if the que has room for only one 
more message and, if so, the message in QSAVE is ignored and the busy message 
(HANDS OFF) is put on the que instead. If QUPUT makes it by the busy message, 
it checks to see if the que is full and, if so, QUPUT exits. If the que is not 
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full, the message is put on the que via QUEIN; QUEIN is advanced to the next 
location and QUECNT is incremented by 1; QUPUT then exits. 

A. 4 KEYBOARD ROUTINES 

All incoming characters are dispositioned by the subroutine KEYBRD. When 
KEYBRD is called it immediately checks location KBDBUF to see if the interrupt 
routines have retrieved a character. If KBDBUF is zero, no character is waiting 
and KEYBRD exits. If KBDBUF is non zero, a character is waiting. The waiting 
character is put into location CHAR which is part of the character look up table, 
and KBDBUF is cleared (set to zero) so that the waiting character will be 
dispositioned only once. KEYBRD next searches the character table. Each defined 
character is assigned a consecutive pair of core locations. The first location 
in the pair is the 8 bit ASCII code of the defined character, the second location 
is JMP to a routine appropriate to the character. The last pair in the table is: 

CHAR, 0 

JMP I KEYBRD 

The reason for this pair is to ensure that all keyboard characters will generate 
a match in the table search routine. All undefined characters cause KEYBRD to 
exit. Starting at the top of the table, KEYBRD compares each defined character 
with the waiting character in location CHAR. The search routine ISZ's by the 
jump instructions in the table location. JMP X is never compared with CHAR. 
When a match is found at location A, KEYBRD executes the jump instruction at 
location A+l via: 

TAD (LOC A+l) 

DCA .+1 

0 /JMP INST 

The following is an explanation of the various routines that are called from the 
character table. 

A. 4.1 D Routine 

This routine restarts DIAL with IOF and XOB clear by jumping to the following 
bootstrap: 

4015 LDF 3 

4016 RCG I 

4017 7300 

A. 4. 2 CTRLH Routine 

The function of this routine is to put TISA into Pause mode. Location 
MODE determines whether TISA is in pause or A/D mode; 0 = pause, 7777 = A/D. 
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CTRLH first checks MODE? if it is zero, CTRLH exits (JMP I KEYBRD) . If TISA is 
in A/D mode, CTRLH sets MODE to 0, sends 0 to CLEN to disable all clock interrupts, 
sets the select words for all devices to 0, puts the address of the pause mode 
message in the AC, calls QUPUT, and then exits. 

A. 4. 3 H Routine 

The character H is the first in a two character command of the form 
HN(N=0,4). The function of the H routine is to enable the N half of the command. 
H does this by setting the word HSWIT to 7777. H also clears the go switch 
GSWIT (sets it to 0) because there is another two character command GN. 
HSWIT and GSWIT cannot be simultaneously enabled, i.e., TISA waits for either the 
N half of G or the N half of H, but not both. After setting HSWIT and GSWIT, 
H exits. 

A. 4. 4 G Routine 

G has the opposite effect of H; i.e., GSWIT is set to 7777 and HSWIT is 
set to 0. 

A. 4. 5 P Routine 

The function of the P routine is to complement the polarity word POLAR. 
Depending upon the value of POLAR, the display routines do or do not complement 
a data word before it is displayed. The logic employed is: 

TAD (DATA WORD) 

SRO I 

POLAR, /7777 COMPLEMENTS 

COM 

After the polarity word is complemented, the P routine checks its value 
and sends either the normal or inverted message to QUPUT, then exits. 

A. 4. 6 F Routine 

Window motion depends upon the value of one word, FREEZE. The logic in 
the display routines is as follows: 

SRO I 

FREEZE, 

JMP (FREEZE) 
JMP (MOTION) 

The F routine dispositions the "F" command and the freeze word in a manner 
exactly analogous to the P routine. 
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A. 4. 7 S Routine 

The function of the S routine is to initialize setup mode. If TISA is in 
A/D mode, S exits; if not, then the interrupts are turned off and S jumps to the 
setup routines at location SETUP. 

A. 4. 8 W Routine 

If TISA is in A/D mode, W exits. If TISA is in Pause mode, W calls the 
LINCtape write routines (see LINCtape Routines, section A. 5. 3). 

A. 4. 9 L Routine 

If TISA is in A/D mode, the L routine exits; otherwise, L jumps to a 
routine that displays the following QANDA message: 



LOAD 
UNIT 



which allows the user to specify program name and unit. When the user terminates 
the load message, the first character of the answer buffer is checked for 00; 
00 means the user input no program name to QANDA and will redisplay the load 
message. When the message is terminated, the routine KLOAD is called, whose 
function is to transfer the QANDA answer buffer to DIAL'S monitor parameter 
table (for a full discussion of the table see DIAL EDITOR V2 internal 
description DEC-12-ZW7A-D) at locations E6+2 (2373) - E6+6 (2377). 

The program name is first transferred, one half word at a time, to an intermediate 
table (LODPTR). Eight characters must be transferred for the program name to 
meet the requirements of the E6 table. Unused portions of a QANDA answer buffer 
contain 00. Unused portions of the E6 table must contain 77. If the user 
requested the program name ABCD, the two answer buffers would look as follows: 



QANDA 
BUFFER 



KLOAD 
BUFFER 



ANSWER, 74 01 /74A 

02 03 /B C 

04 00 /D - 

00 00 / 

00 74 /-74 
XX /UNIT 



LODPTP, 01 02 
03 04 
77 77 
77 77 

YYYY 



/AB 
/CD 



/UNIT 



The KLOAD routine skips over the first QANDA 74 and terminates name transfer 
when it uncovers the second 74. The response for unit in the QANDA answer 
buffer is stripped to 3 bits and stored in the LODPTR table after the name. 
60 (0) is unit 0 and 01 (A) is unit 1, etc. When the LODPTR table has been 
set up, KLOAD puts LODPTR- 1 into the AC and calls the routine LOADER. 
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The function of the routine LOADER is to transfer the table whose address-1 
is in the AC to the E6 table and call the DIAL loader. All program calls in 
TISA to DIAL binary files realize that setting up the E6 table and calling the 
DIAL LOADER is sufficient work to accomplish the task. LOADER turns off the 
interrupts, clears the XOB and special functions, registers and reads the 
Editor's grid table into LDF1 in case the DIAL LOADER decides to display "NO". 
The AC table is transferred to the E6 table and then the DIAL LOADER is read in 
and started. The logic is highly similar to executing an LO command in the 
DIAL EDITOR. 

A. 4. 10 C and M Routines 

The function of the C and M routines is to call the programs CATACAL and 
MAGSPY, respectively. Both routines will execute a JMP I KEYBRD if TISA is in 
y-i/D MODE. Otherwise, the address, CATPTR-1 or MAGPTR-1, is loaded into the 
AC and the LOADER routine is called. 



CATPTR, 0 301 /CA MAGPTR, 1501 /MA 

2401 /TA 0723 /GS 

0301 /CA 2031 /PY 

1477 /L 7777 

0 /UNIT 0 /UNIT 

C and M both require the programs to be on unit 0. C, M, and L all require 

a DIAL V2 tape to be on unit 0. DIAL MS will not work because the MS LOADER is 

logically different from the V2 LOADER. 

A. 4.11 NUM Routine 

The function of the NUM routines is to interpret numeric characters. NUM 
first strips the ASCII and stores the number in TEMP. NUM compares TEMP 
with DEVNUM, the number of defined devices, to check for an undefined number, 
exiting in such a case. If the number in TEMP is a defined device number, 
NUM checks HSWIT for 7777. Tf HSWIT is set, NUM clears it and calls the HALT 
routine. If HSWIT is not set, NUM chocks GSWIT. Tf GSWIT is set, NUM clears 
it and calls the GO routine; otherwise NUM exits. 

A. 4. 12 HALT Routine 

The HALT routine checks the device select word to see if the device is in 
Pause mode and, if so, HALT exits. If the device is in A/D mode, HALT sets the 
select word to 0 to deselect the device, calls the routine HLTMS to put the 
Halt message on the Teletype que, and then exits. 

A. 4.13 GO Routine 

The GO routine first checks the device select word to determine if the 
device is in A/D mode and, if so, GO exits. If the device is in Pause mode, GO 
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calls GOMS to put the go message on the que. With the aid of 4 tables and rela- 
tive to the device number in TEMP , the GO routine next initiates the device. 

Device K has 2 tables associated to it: TIADK and TISTRK. TISTRK holds 
the parameters that define the device, and TIADK holds the addresses within the 
data acquisition routines of these parameters. To initiate a device, six parame- 
ters must be set up within the acquisition routines: starting address (2 words), 
select word, sampling frequency (variable) , sampling frequency (fixed) , and 
initial X axis SAM. There are two other tables that are shared by all devices 
VALTAB and ADRTAB : 



VALTAB, TISTRO ADRTAB, TIADO 

TISTR1 TIAD1 

TISTR2 TIAD2 

TISTR3 TIAD3 

TISTR4 TIAD4 

Note that for device K - whose value is in TEMP - VALTAB+K, ADRTAB+K point 
to TISTRK, TIADK respectively. The GO routine employs the above logic in 
selecting the tables appropriate to device K. GO further sets up a SAM 
instruction because analog devices require an initial X-axis SAM at location 
OSDVK. GO then sets HSWITK to 7777 for the routine CHKSWI , turns the interrupts 
off, and transfers the device parameters to the data acquisition routines. The 
interrupts must be off during parameter transfer because it is possible to 
get an interrupt from device J when device K is only partially initialized. 
Such a circumstance could produce adverse results for device K. The interrupts 
are off for 200 microseconds, which presents no problem for the data acquisition 
routines. Once the device is initialized all clock interrupts are enabled and 
MODE is checked. If TISA is in Pause mode, the A/D mode message is sent to the 
que. GO then sets MODE to 7 777, turns the interrupts back on, and exits. 

A. 5 LINCTAPE ROUTINES 

There are six LINCtape routines that enable the user to either read a 
parameter list from LINCtape or write his data buffers onto LINCtape. 

A. 5.1 READ Routine 

If the user selects the LINCtape option during setup mode, TISA calls the 
READ routine, which displays the QANDA message: 

READ TBLK 
UNIT _ '" 

When the message is terminated, READ sets a pointer to the QANDA answer buffer 
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and calls DORDC. 



A. 5. 2 DORDC Routine 

DORDC calls the routine TPARGS whose function is to translate a QANDA 
message which holds LINCtape arguments. If TPARGS returns to P+l, the QANDA 
input was illegal and DORDC implements the error exit, which is simply a recall 
to the READ routine. If TPARGS returns to P+2, then location TBLK holds the 
requested tape block; UNIT holds the low order unit bit i.e., UNIT=10 or 0; 
and the XOB holds the high order unit bits. Using the arguments from TPARGS, 
DORDC reads the requested TBLK into locations 7000-7377 (start of the data 
buffer), executes an I/O preset to clear all flags and the extended unit bits, 
resets no pause, and transfers the parameter list at 7000-7377 to the setup 
initialization table at 6000-6144. If the user requests a TBLK that does not 
contain a legitimate paramater list, DOkDC checks the only value in the table 
that could be fatal to TISA and the user, to wit, the number of defined devices. 
The function of setup mode is to fill the initialization table with the user's 
parameters. As the user defines more instruments, more information is input to 
this table. When setup mode is terminated, TISA takes the information from 
the initialization table and distributes it to appropriate locations within the 
program. The number of user defined devices is in the table and determines the 
length of the table transfer. If the number of defined devices is greater than 
the maximum number allowed, TISA will extend beyond the initialization table and 
transfer arbitrary values to arbitrary locations; such a situation is quite 
obviously fatal. If the number of defined devices is too large, DORDC executes 
the error exit; otherwise, DORDC goes to the last leg of the setup routines 
(QADUN+3) i just as if input was from the keyboard. 

A. 5 . 3 WRIT Routine 

WRIT first shuts off the interrupts so that the user cannot inhibit the 
write sequence via the keyboard. WRIT then retrieves the number of blocks to 
write from the initialization table (loc. BLKCNT) , translates it into DIAL codes, 
and puts it into the text field of the QANDA write message. The following 
message is then displayed: 

WRITE 
FIRST 
UNIT 

where XYY is the number described above. When the user terminates the message, 
WRIT sets a pointer to the QANDA answer field and calls DOWRC . 



XYZ (OCT) TBLKS 
TBLK =■ 
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A. 5. 4 DOWRC 

Like DORDC, DOWRC calls TPARGS ; at the error return (P+l) is a recall to 
the routine WRIT. If there is no QANDA input error, DOWRC sets up the following 
arguments for DOMTP: WRI I (U) to ARGHI , MBLK\TBLK to ARGLO; then calls DOMTP. 
When DOMTP returns to DOWRC, the operation is finished and DOWRC turns the 
interrupts on and hangs up in the idle loop. 

A . 5 . 5 TPARGS 

The function of TPARGS is to retrieve the TBLK and UNIT arguments from a 

QANDA answer field and to return to P+l for input error and P+2 for no error. 

To achieve this end, TPARGS enlists the aid of the more general QANDA numeric 
decoder DIGCHK, a routine that is heavily exercised during setup mode. DIGCHK 
has 3 returns : 

JMS I KDIG /CALL 

/NON DECIMAL CHAR RTN 

/QANDA END OF QUES . FIELD RTN 

/NORMAL RTN OCTAL NUM IN AC 

TPARGS changes location UPLIM of DIGCHK to minus 10 (l's complement) so that 
non-octal input will be illegal. TPARGS then calls DIGCHK, retrieving in this 
manner one numeric argument at a time. If DIGCHK returns TPARGS to P+l, then 
TPARGS returns to the calling program at P+l (the TPARGS error return) . The 
arguments for TBLK are rolled and packed into location TBLK. DIGCHK is called 
until it executes the end Of field return at whicn point TPARGS calls DIGCHK 
one more time for the UNIT argument. The low order unit bit is put into bit 8 
of location UNIT and the two high order unit bits go to bits 10 and 11 of the 
XOB. After the tape arguments have been set up, TPARGS restores UPLIM to its 
regular value and returns to P+2. TPARGS always restores UPLIM before exiting, 
error or no error. 

A. 5. 6 DOMTP 

The function of DOMTP is to execute a series of tape transfers as indicated 

by a list of arguments. Currently, only DOWRC calls DOMTP, but DOMTP is qeneral 

enough in nature to read data as well as write it. The arguments for DOMTP are: 

BLKCNT = - (the number to do) 

ARGHI = a LINCtape instruction 

ARGLO = initial MBLKXTBLK 

LDFSTR = initial LDF 

DOMTP first retrieves and sets up its arguments, then issues a tape instruction 
and calls TPWAIT, which is simply a routine to hang in the idle loop until the 
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tape operation is complete. When the tape is finished, DOMTP adds 1 to the 
TBLK and 1 to the MBLK, then checks the MBLK to see if it advanced from 7 to 0 . 
When the MBLK goes to 0, DOMTP resets it to 4 and adds 1 to the LDF instruction 
at TPLDF . All tape transfers are done via the data field. DOMTP then iterates 
the tape process, counting each step. When the operation is finished, DOMTP 
stops the tape, clears the extended unit bits, and exits. 

A. 6 DISPLAY ROUTINES 

The Display Routines present the user with one of two displays, depending 
upon SSWO : Help Frame, or Data Buffer Display. 

A. 6.1 DSCHLP Routine 

The DSCHLP Routine (help frame) is driven by 4 tables: (1) HLPTAB, which 
contains the DIAL codes for all the characters displayed in the help frame plus 
a number of control characters that are not displayed; (2) VCTAB, which is a 
table of scope vertical coordinates and determines the vertical alignment of 
the help frame; (3) HCTAB, which is a table of scope horizontal coordinates 
and determines the horizontal alignment of the help frame; and (4) GRDTAB , 
which is the QANDA table of grid patterns. The following codes in HLPTAB are the 
control characters that direct DSCHLP to take certain actions: 



Symbol Value Meaning 

FUL1 0600 Switch to full size characters 

CR1 4 300 End of a line; go to next line 

ENDWD1 7700 End of help frame; exit 

CHGHC 3600 Reset horizontal coordinate 

The LINC data field is set to 2, where the GRID table is located. 

DSCHLP first sets up pointers to the tables and falls through to LNNXT. 
LNNXT puts the next vertical coordiaate in VCOORD, the next horizontal coordinate 
in BETA1, and then checks the first character of the line to determine full or 
half size characters. The link bit is set to 0 for half size characters anr to 
1 for full size characters. After setting character size, LNNXT goes to CHRNXT. 
CHRNXT loads a character from HLPTAB and checks for the control characters, 
CR1, ENDWD1, and CHGHC. CRl causes a jump to LNNXT, ENDWD1 effects an exit, 
and CHGHC causes the next value in HCTAB to be placed in BETAl . If CHRNXT finds 
no control characters, it calls DSCCHR routine to DSC the character whose DIAL 
code is in the AC. 
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A. 6. 2 DSCCHR Routine 

DSCCHR finds an address in GRDTAB relative to the contents of the AC and 
stores the address in GRDPTR (BETA14) . VCOORD is loaded into the AC and the 
character is displayed. To make a horizontal gap between characters so they 
won't look pressed together on the scope , 2 or 4 is added to BETAl . DSCCHR 
checks the link bit which indicates character size. A gap of 2 is for half size 
and 4 is for full size 

A. 6. 3 Data Buffer Display 

The Data Buffer Display is controlled by two knobs, 0 and 4. The high 
order 9 bits of knob 4 determines cursor position; 9 bits will cover 512 points. 
The A/D value 7400 is converted to -1, and the value 377 is converted to -1000. 
The converted value is called the cursor count and is stored in location CURCNT. 
Every time a point is displayed, CURCNT is IS Zed . When CURCNT goes to zero, 
the cursor is displayed. The high order 6 bits of knob 0 is added to the 
initial scope address to find the address of the first point (leftmost scope 
point) to be displayed. Suppose the knob value is 10 and the initial scope 
address is 2000. The display routines display the data from 2010 to 3010 the 
first time they are called; the second time the display is called, locations 
2020 to 3020 are displayed, and so on. Varying the initial scope address in the 
manner described above lends the appearance of motion to the display routines. 
Positive knob values move the display from right to left; negative values, from 
left to right. 

When the Data Buffer Display is called, knob 4 is put into CURCNT, 
XCORD (loc 2017) is set -1000, and knob 0 is put into the AC. Next the FREEZE 
location is checked. If the display is frozen, the display routine (GODIS) is 
called immediately. If the display is not frozen, the routine SETMOT is called 
to determine the initial scope address relative to knob 0. 

A. 6. 3.1 SETMOT - The locations BUFHI , BUFLO hold the initial 15 bit scope 
address that was used for the last call to the Data Buffer Display. The func- 
tion of SETMOT is to update this address for each call. The routine further 
must be capable of making the initial and terminal points of the buffer 
contiguous. Suppose knob 0 has a value of 20 and BUFHI, BUFLO = 0001,7770 (8K of 
core) . Adding 20 to this address extends 10 locations beyond the size of the 
data buffer, i.e., 0002,0010. There is no field 2 on an 8K PDP-12. This effect 
i called high end wrap around. For this case, SETMOT sets the initial address 
to jlO locations past the initial data buffer address., i . e . , 0001,7010. Low end 
wrap around is handled in analogous fashion. When SETMOT exits, the proper 
address is in BUFHI, BUFLO. Note that all routines which must handle 15 bit 
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addresses treat the high order half as a PDP-8 field. An address at HI , LO is 
referenced in the following manner: 



TAD HI 
CLL RTL 

RAL 
TAD CDFO 
DCA .+1 

0 /CORRECT CDF INST 

TAD I LO /CORRECT ADDR 



A. 6. 3.2 GODIS Routine - GODIS displays 512 consecutive data points, beginning 
with the address BUFHI , BUFLO . BUFHI goes to CURCDF, BUFLO goes to BUFPTR. The 
routine SETCDF sets the data field relative to CURCDF. The BETA register for 
display is XCORD (2017) and runs from 7000 to 7777. Note that hardware channel 1 
is selected. When CURCNT goes to zero CUPDIS is called to display the cursor. 
If BUFPTR goes to zero, a PDP-8 field boundary has been reached and FWDCDF is 
called to set the next data field. FWDCDF also checks for high end wraparound. 
BCNTR is set to -1000 when this location goes to zero, GODIS is finished, 
XYGET is called to display the X,Y coordinates. 

A.6.3.3 CURDIS - When CURDIS is called, the cursor Y coordinate is in the AC and 
it is stored at location YCUR, not only for use by CURDIS but also for subsequent 
use by the X,Y coordinate routines. 

K The contents of the data field are put into XCURHI and BUFPTR is put into 
XCURLO. These two locations are the X coordinate and will be subsequently 
accessed by the routine XYGET. YCUR is compared to MAXCUR; if YCUR is greater 
than MAXCUR, -1 is put into TEMPHI and the cursor is displayed below the spectrum. 
Minus the length or the height of the cursor is in location CURLEN. The cursor 
is displayed by putting YCUR into the AC, displaying it CURLEN times via a DIS 
XCORD j prior to each DIS, TEMPHI is added to the AC. 

A. 6. 3. 4 XYGET Routines - The routines that determine the X,Y decimal 
coordinates use a table called LIMVL whose format is: 



LIMVL0 , 



BCD0 



0 
0 
0 



/-starting address device 0 (LO ORD) 
/-starting address device 0 (HI ORD) 

-sampling frequency device 0 
/address of initial X-coordinate device 0 



LIMVLK, 



BCDK 



0 
0 



0 
0 
0 



/-S.A. device K (LO ORD) 
/-S.A. device K (HI ORD) 
/-sam.freq. device K 
/addr of X-COORD device K 
/-first unused core 
/location 
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The first task of XYGET is to find the data sector that contains the address 
XCURHI , XCURLO . This is done by adding the X coordinate to the starting addresses 
in the LIMVL table, always saving the sum for step k-1. If the sum for step k 
becomes minus, then the X coordinate lies in between the starting addresses used 
for steps k-1 and step k; and the sum for step k-1 is the address of the 
X coordinate, relative to the data sector that contains the X coordinate. 
Suppose that the data sector for device 0 is 1000 g points and the X coordinate 
is 07500. The starting address for device 0 is 0 7000; for device 1 it is 1 0000. 
The X coordinate is the 500th point in the data sector for device 0. Subtracting 
the starting address for device 0 yields a sum of +500 which is saved. Because 
the result is positive, the process continues for device 1, yielding 07500-10000 = 
-300, which is negative. The negative result means that the previous sum, step 
k-1, i.e., 500, is the desired address. If the entire table is scanned without 
a negative result, the X coordinate is in undefined data area and the XYGET 
routines exit. The relative address is then multiplied by the sampling frequency; 
this result is converted to a six digit BCD number. A routine to deflate by 
decimal radii is used for the conversion. The BCD number is stored, one digit to 
a word, at locations BCDVAL-BCDVAL+5 . If the sampling frequency is 3, the value 
to convert to BCD is 1700. The decimal value for 1700 is 960, which is stored 
as : 

BCDVAL , 0 
0 
0 

11 /9 
6 /6 
0 /0 

960 is a relative decimal value and must be added to the initial X coordinate 
which is stored from low to high, starting at location BCDK: 

BCDK, /UNITS 
/TENS 
/HUNDREDS 
/THOUSANDS 
/ 10 THOUSANDS 

The number at BCDVAL is added as a BCD number to the number at BCDK. To obtain 
the DIAL code for each digit, add 60 to the sum for each digit. The DIAL codes 
are stored in the table DCODEX: 

DCODEX, 3075 /X= 

4300 /CR 100K 

0000 /10K IK 

0000 /100 10 

004 3 /UNITS CR 
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These values will subsequently be displayed by the routine DSCXY. 

After the table DCODEX has been set up for the X coordinate, the table 
DCODEY must be set up for the Y coordinate. First, 400 is added to YCUR to 
put it in the range 0-511(0-777); YCUR is then converted to a BCD value and then 
to DIAL codes, one digit at a time, and stored in the table DCODEY. 

A. 6. 3.5 DSCXY Routine - DSCXY sets the LDF to 2 to access the grid table; sets 
half size characters, and sets the X,Y display coordinate for the top left of 
the scope (0,400). The routine always displays X=, Y= but never displays 

r 

leading zeroes or the value 0000. The non-numeric characters are separated from 
the numeric characters by the carriage return code (43) . Display of numeric 
characters is inhibited until the first non-zero digit (DIAL code jt 60) is 
encountered. The characters are displayed by loading their codes into the AC 
and calling the routine DSCCHR. When DSCXY is finished, the entire scope display 
is complete. DSCXY exits to SCPRTN. 

A. 7 SETUP ROUTINES 

The function of the Setup Routines is to decode QANDA responses and put 
them into the initialization table which runs from location INISTR to LAST, or 
to fill the table from a specified block of LINCtape. QANDA and calls to 
QANDA are in segment 2. The Setup Routines start at location SETUP. For each 
QANDA setup message, the refresh return contains the instruction JMP CHKSNS : 

CHKSNS/ SNS 0 

JMP QARFSH 
SETUP, PDP 

thus activating SSW0 for all of Setup mode. The Setup Routines first call 
the routine FRSTR (fresh start) , which clears the data buffer and sets all 
pointers to their initial values. Message 1 is then displayed. After message 1 
comes either the READ message (see above) or message 2. 

A. 7.1 MESS2 Routine 

MESS 2 first calls the routine RESTR (restart a device) , whose function is 
to reset all pointers to their initial values for defining device K. The initial 
values for device K are preserved throughout the entire definition of device K 
so that if an error is made in input the routine RESTR will be able to reset 
them. 

All values go into the table via the index pointer INIPTR. When message 2 
is terminated, the QANDA answer buffer is decoded and put into the initialization 
table. The first value is the device type. If the device is analog, the value 
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ANAVAL (4 0 00) is put in the table; if the device is encoded, a value from the 
table ENCVAL is put into the initialization table. The next 3 values are the 
STARTING POINT , TOTAL POINTS, and SAMPLING FREQUENCY. The routine DIGCHK is 
used to convert the DIAL codes to digits. The routine DIGCHK expects that 
BETA14 (ANSPTR) is pointing to a QANDA answer field. When DIGCHK is called, it 
retrieves one QANDA character. If the QANDA character is 00 (a blank) it is 
ignored and another character is retrieved. If the QANDA character is QANDA 
end of question field (74, <) or QANDA end of answer buffer (34,\), DIGCHK exits 
to P+2. If the character is decimal (codes 60-71), DIGCHK exits to P+3 with 
the numeric value (0-11) in the AC. If the character is not decimal and not 
either 74 or 34, DIGCHK exits to the error return P+l. All DIGCHK error returns 
initialize the routine MESS 2 . 

To setup the starting point, the routines DIGCHK and DSCL4 are alternately 
called until the end of question field return. DSCL4 takes the contents of the 
AC and rolls and packs them 4 bits each call into the double precision 
accumulator (DAC) . After the starting point has been put into the DAC, the 
routine UPACK is called to take the BCD values out of the DAC and put them into 
the initialization table. 

After STARTING POINT has been set up, TOTAL POINTS is set up. For TOTAL 
POINTS, the routines DIGCHK and MUL10 are alternately called until end of 
question field. MUL10 does a decimal to octal conversion with the DAC and AC. 
When TOTAL POINTS is in the DAC, the arguments appropriate to TOTAL POINTS are put 
into the table, e.g., starting address device K, 2's complement of the starting 
address, etc. The error conditions "no points" and "buffer full" are checked 
for at this time. 

Like TOTAL POINTS, SAMPLING FREQUENCY is retrieved by alternately calling 
DIGCHK and MUL10 . After the sampling frequency is in the DAC, the error 
condition greater than 10 is checked for. If the sampling frequency is zero, 
it is set to 1 before being input to the table. Sampling frequency terminates 
definition of the device and message 3 is displayed. 

A. 7, 2 MESS 3 Routine 

If the user requests more devices, the error conditions "no more devices 
and "buffer full" are checked first, then the routine NXSTR (start next device) 
i' 7 called, whose function is to set up all pointers for the definition of the 
next device; MESS 2 is then recalled. If the user requests to start, an I/O 
preset is executed and the routine GBLK is called, whose function is to translate 
the defined data area into (-) the number of TBLKS and store it at location 
BLKCNT. After GBLK, the routine QADUN is called, whose function is to initialize 
TISA. 
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Associated to the initialization table is the table of addresses INIAD, which 
tells where all the initial values are to go. Using INIAD, QADUN distributes 
the initial values throughout TISA. The buffer preset and clock control 
registers are set at this time. The TTYQUE is initialized; pause mode is 
entered by setting the mode to A/D and putting the control H character into 
KBDBUF. The interrupts are turned on and the IDLE routine is called. 

The function of the IDLE routine is to keep TISA busy, when it is not 
acquiring data, by calling four routines and exiting. The routines and the order 
in which they are called are 

1. SCOPE DISPLAY 

2 . KEYBRD 

3 . CHKSWI 

4 . MESCHK 



A. 8 MEMORY CHECK ROUTINE 

The routine MEMCHK lies in the data area and is called once only (when 
TISA is loaded from LINCtape) . Its function is to determine the core limits 
of the PDP-12 on which TISA is running. MEMCHK puts the largest PDP-8 field 
in location MAXCDF and exits. This routine must be called for TISA to function 
properly and is the primary reason why the starting address for TISA is 4001 and 
the restart address is 4020. 



A- 18 



A. 10 CORE ALLOCATION 




(6725-6777 UNUSED) 
TTY MESSAGES 
LIMVL TABLE 

TABLE OF DECIMAL RADII 

TTYQUE 

GO TABLES 

INIT TABLE ADDRESSES 
INIT TABLE VALUES 



(5701-5777 UNUSED }) 
QANDA SUBROUTINE 
QANDA TEXT FIELDS 
DIGCHK 

ALL CALLS TO QANDA (MESSl ETC.) 
SETUP MODE ROUTINES 



(3754-3777 UNUSED) 
TTY (HLTMS , GOMS , AND NUMPUT) 
QADUN 
CHKSWI 

SETUP MODE SUPPORT ROUTINES 
ARITHMETIC ROUTINES 

HELP FRAME AND DATA BUFFER DISPLAY 
IDLE ROUTINE 



(1765-1777 UNUSED) 
LOAD ROUTINES 
HALT AND GO ROUTINES 
KEYBOARD ROUTINES 
LINCTAPE ROUTINES 
TTY (MESCHK, QUPUT) 

INTERRUPT ROUTINES DATA ACQUISITION 



6, 7, 12-17, 111-177 UNUSED 
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CLR XOB U BITS 







BUSY MESS 
TO AC 



QUPUT 







AC ♦ QSAVE 








MESS TO TTY QUE 



ADVANCE OUEIN 
ADVANCE QUECNT 



< 



d ex,t z> 



ADV PAST TABLE JMP 




SAVE IN CHAR 
CLR KBDBUF 



SET PTRS TO 
CHARACTER TABLE 



GET NXT CHAR 
FROM TABLE 






V 


LOAD 
INST 
TABL 


JMP 

FROM 
E 



c 








«• 1 






CLRNO 
PAUSE 






START 
DIAL 







COMPLEMENT 
POLAR 











j INVERT MESS f 
L T0AC S 







SPECTRA 
INVERTED 

? 







NORMAL 
TO AC 


MESS 




c r ex,t ~z> 



B-5 






Y 


MAGPTR -1 
TO AC 







^^LOADER~^) 






V 


iOF 







d CTRLH I^ 



N „^ PAUSE 
MODE 





Y 


0 -» MODE 

0-* CLOCK ENABLE 






0-> ALL SELECT 
WORDS 






PAUSE 
TO AC 


MESS 






| CALL QUPUT 











HALT MESS TO AC 






CALL QUPUT 






CALL NUMPUT 









0 TO MODE 

0 TO CLOCK hHMi 



<H ex,t 



B-7 



IS 

DEVICE K 
HALTED 

? 





N 


OTO SELDVK 






1 HALL HLTMS 











GO MESS TO AC 






CALL QUPUT 






CALL NUMPUT 







^^^NUMPUT 







NUM MESS K 
TO AC 






CALL QUPUT 







A/D MESS TO 
AC 



DEVICE 
K HALTED 





Y 


CALL GOMS 






SETUP PTRS TO 
TABLES 






SETUP INITIAL 
X AXIS SAM 






OTOHSWITK 






IOF 






TRANSFER VALUES 
FROM TABLE TO 
DEVICE K PARAM 
LIST 






SAM XAXIS 
PUT AT OSDVK 






ENABLE ALL CLOCK 
INTERRUPTS 








7777 10 MODE 



B-8 



IC 


' 1 






TRANSLATE BLKCNT 
TO DIAL CODES AND 
PUT IN QANDA 
WRITE MESS 






DISPLAY 
NAME MESS 







QANDA 
DONE 

? 





Y 


DISPLAY 
WRITE MESS 







QANDA 
DONE 





Y 


SET PTR TO 
QANDA ANSWER 
BUFFER 







N 




REFRESH 




MESSAGE 



^^DOWRC^^^ 



c 







DISPLAY 

LOAD MESS ! 



c 



SET PTRS TO 
QANDA ANSWER 
AND LOAD TABLE 



LOAD NEXT 
QANDA CHAR 




QANDA 
BLANK 




STORE CHAR 
IN LOAD 
TABLE 



GET I 
NUM 


INIT 






LOD PTR -1 
TO AC 







c 




B-10 



CALL TPARGS 



READ 



INPUT 
ERROR 





N 


READ IN ! 
REQ. TBLK 






[ I/O PRESET ] 






J SET NO PAUSE 






SETUP 
INIT TABLE 




L r 



DSCHLP 



ILLEGAL 
TBLK 

? 





N 


CALL FRSTR 






-NUMOF 
DEVICES TO 
AC 







STRRDE^^^ 



DISPLAY 
HELP 
FRAME 

? 





N 


KNOB 4 TO 
CURCNT 






-1000 TO XCORD 






j KNOB 0 TO AC j 









\. FROZEN 

? 




I CALL GODIS J I CALLSETMOT 





















SCPRTN ^"^^ 



J CALL KEYBRD 






J CALLCHKSWI | 






| CALLMESCHK 







B-ll 




SET PTRS 
TO TABLES 



SET VCOC 
BETA1 FO 


)RD, 

R NXTLN 






LOAD 1ST CHAR 
Of A LN 



1 SET HA 


IF SIZE 






0 TO LINK ] 






RELOA 
CHAR 


D 1ST 




FULL 
SIZE 
CHAR 



LOAD NXT CHAR 



CL ex,t J> 




RESET 
BETA 1 



CALL DSCCHR 



SET FULL SIZE 



3 







1TOL 


INK 



^^GODIS^^^ 



CALL CURDIS 



CALL FWDCDF 



SET IN 
SCOPE 
ANOCt 


TIAL 
ADDR 
)F 






SET CO 
FOR 61 


UNTER 
2 PNTS 



LOAD THE NEXT 
DATA POINT 
AND SCR 1 




INVERT 
SPECTRA 

? 




DISPLAY 
CURSOR 




ADVANCE 
CDF 




B-12 







SUB KNOB 0 
FROM BUFLO 
















ADO KNOB 0 TO 
BUFHI, BUFLO 







BUFLO 
UNDER 
FLOW 

? 



■1 + BUFHI 
TO BUFHI 



HI END 
WRAP 





V 


MINCDF - 


♦ BUFHI 



GODIS 




-MINADR f BUFLO 
TO BUFLO 



MAXCDF TO BUFHI 







MINADR + BUFLO 
BUFLO 



FWDCOF 







J ADD 1 TO CURCDF j 








CURCD 
DATA 1 


F TO 
IELD 







B-13 



SET GRID TABLE 
ADDR RELATIVE 
TO AC 



VCOORD TO AC 




CT exit 



FOUND 







MULT DIFF 
BY SAM FREQ 






CONVERT RESULT TO 
BCD BY RADIX 
DEFLATION 






ADD BCD RESULT 
TO INITIAL X COORD 






CONVERT SUM TO 
DIAL COOES STORE 
AT DCODEX 






| 400 + YCUR TO YCUR | 






J CONVERT YCUR TO BCD ] 






CONVERT BCD RESULT 
TO DIAL CODES 
STORE AT DCODEY 







BUFPTR TO 
XCURLO 







j 1 TO TEMPHI 








YCUR 


rOAC 








J ADD TEMPHI TO AC 






| DIS 1 POINT 




B-14 





SET POI 
LIMVL T 


MTER TO 
ABLE 






K-0 








SUB S. ADDR DEVICE K 
FROM XCURHI, XCURLO 


/ 1 


S 

Y 


SAVE 
DEVIC 


DIFF 
E K 




SET HALF 
SIZE CHARS 



SET PTR TO 
DCODEX 



SET HC. VC 



LOAD NEXT 
CHAR 




CALL DSCCHR 



LOAD NEXT CHAR 




LOAD NEXT CHAR 




CALL DSC CHH 



IWlb 




B-16 



DSC READ 
MESS 



CALL CHKSNS 






Y 


SET PTR TO 
QANDA ANSWER 







^^"frstr^^^ 







ZERO OUT 
DATA BUFFER 






INIT ALL 
SETUP PTRS 
FOR DEVICE 0 







DSC 
ERR 


ENC 






CALL 
CHKSNS 



INIT PTRS 
FOR DEVICE K 



S. ADDR LOT. INIT 
S. ADDR HI TABLE 



-S.ADDRLO"] INIT 
-S. ADDR HI TABLE 



CALL CHK SNS 





ENCODER SELECT 
TO AC 



AC TO TABLE 



UP DEV COUNT 



ANALOG 
SELECT 
TO AC 



B-17 



A2LOP "^^^ 



MESS2 



MESS2 



^^^^A3CONT 



CALL DIGCHK 




PACK BCD VAL 
IN AC IN DAC 



TRANSFER STARTING 
POINT FROM DAC TO 
TABLE 



CALL DIGCHK 









AC - TEMPLO 






| 2* DAC 


^DAC j 






| SAVE 2*DAC j 






4'DAC - DAC 
YIELDS 8*DAC 






8«DAC + 2'DAC 
TO DAC 






DAC + TEMPLO 
TO DAC 




L 



B-18 




B-19 




B-21 




CRTN ^*\. 
^ ' 




STRRDE 




-NUM DEFINED 
DEVICES TO AC 



AC TO TABLE 



TRANSFER INIT 
TABLE VALUES TO 
TISA ROUTS AND 
TABLES 



START CLOCK 



SET TISA TO 
A/D MODE 
7777 - MODE 



210 (CTRLH) - 
KBDBUF 



B-22 



0000 <*20 

0001 /TISA (TIME INDEPENDENT 

0002 /SPECTRUM ACQUISITION) 

0003 /MULTIPLE DEVICES INTERRUPT DRIVEN 

0004 /MOVING WINDOW DISPLAY 

0005 /CURSOR AND X-Y DECIMAL READ OUT 

0006 /USES QANDA FOR SET UP MODE 

0007 /SUPP0RTS UP TO 32K OF CORE 

0010 PMODE /INTERRUPT 

0011 »1 /DISPATCH 

0012 0001 5402 JMP I ,*1 /P MODE 

0013 0002 0230 INTP 

0014 0003 0000 BETA1, 0 /BETAS FOR LOAD 

0015 0004 0000 BETA2 # 0 /ROUTS 

0016 0005 0000 BETA3 » 0 

0017 *10 

0020 0010 0000 INIPTR, 0 /PTRS FOR TABLE 

0021 0011 0000 ADPTR, 0 /SETUP 

^022 /OF INITIAL VAL 

0023 »20 

0024 0020 0000 ADMESS. 0 /MESSAGE PTR 

0025 /FOR TYPE OUT 

0026 /ROUTINES 

0027 0021 0000 KBDBUF, 0 /HOLDS LAST 

0030 /KEYBOARD CHAR 

0031 0022 0000 TTYFLG, 0 /HOLDS LAST 

0032 /TTY CHAR 

0033 /=0 if NONE 

0034 0023 0000 QUE I N# 0 /PTR TO TTY QUE 

0035 /FOR IN COMING 

0036 /MESSAGES 

0037 0024 0000 QUEOUT, 0 /PTR FOR OUT 

0040 /GOING MESS 

0041 0025 0000 QUECNT » 0 /HOLDS NUMBER 

0042 /OF UNTYPED 

0043 /MESSAGES IN 

0044 /TTY QUE 

0045 0026 0000 STATUS, 0 /HOLDS CLOCK 

0046 /BITS FROM CLSA 

0047 0027 0000 DVTYP, 0 / TELLS WHETHER 

0050 /A DEVICE IS 

0051 /ANALOG OR 

0052 /ENCODED 

0053 /4000= ANALOG 

0054 /0XXX=ENCODED 

0055 0030 0600 KINPUT, INPUT /PTR TO INPUT 

0056 /ROUT 

0057 0031 6201 CDF0 , CDF 0 

0060 0032 0000 MAXCDF, 0 

0061 0033 0000 MINCDF, CDFMIN 

0062 0034 7000 MINADR. ADRMIN /BUFFER BOUNDS 

0063 0035 0000 YCURi 0 /Y COORD 

0064 /OF CURSOR 

0065 0036 0000 DEVNUM, 0 /-NUM OF DV 

0066 /AT RUN TIME 

0067 0037 2330 KDADD • DADO /CALL TO DBL 

0070 /PREC ADD 

0071 Ml /L MODE 
00/2 0041 0002 2 /INTERRUPT 

0073 0042 5443 JMP I ,*1 /DISPATCH 

0074 0043 0200 INTL 

0075 0044 0000 DBLLO, 0 /DBL PREC 



0076 


0045 


0000 


DBLHI, 


0 


/AC 


0077 


0046 


0000 


ARGLO, 


0 


/DBL PREC 


0100 


0047 


0000 


ARGHI , 


0 


/ARG 


0101 










/ALSO * 


0102 










/XCURLO» XCURHI 


0103 










/CURSOR X COORD 


0104 


0050 


0000 


TEMPLO i 


0 




0105 


0051 


0000 


TEMPHI , 


0 




0106 


0052 


0000 


CNTR, 


0 




0107 


0053 


0000 


BCNTR , 


0 




0110 


0054 


0000 


BUFPTR, 


0 


/FOR MOVING 


0111 










/W INDOW DlSP 


0112 


0055 


0000 


LIMPTR, 


0 


/PTR TO ARGS 


0113 










/FOR SR XYGET 


0114 


0056 


0000 


BCDPTR, 


0 


/PTR TO BCD VAL 


0115 






RADPtR, 




/FOR SR XYGET 


0116 


0057 


0000 


0 


/PTR TO PWRS OF 


0117 










/10 FOR OCTAL 


0120 










/TO DECIMAL SR 


0121 


0060 


0000 


CURCOF, 


0 




0122 


0061 


7 773 


MAXOVN, 


OVNHAX 


/ = -NUM OF DEV 


0123 










/TISA WILL 


0124 










/SUPPORT 


0125 


0062 


0377 


KCLEN, 


0377 


/GOES TO CLEN 


0126 










/INT ON OVF 


0127 










/CHAN Ii2»3 


0130 


0063 


4466 


KDIG, 


DIGCHK 


/CALL TO SR TO 


0131 










/CHK QANDA ANS 


0132 










/BUFER FOR 


0133 










/NUMERIC INPUT 


0134 


0064 


3000 


KMUL10 » 


MUL10 


/CALL TO DECMAL 


0135 










/TO OCT CVERT 


0136 


0065 


2020 


KIDLE, 


IDLE 


/CALL TO IDLE 


0137 










/LOOP 


0140 


0066 


0000 


SELQV0 » 


0 


/DEVICE SELECT 


0141 


0067 


0000 


SELDV1 » 


0 


/WORDS 


0142 


0070 


0000 


SElOV2i 


0 




0143 


0071 


0000 


SELDV3, 


0 




0144 


0072 


0000 


SELDV4, 


0 




0145 


0073 


7777 


HSW1T0, 


7777 




0146 


0074 


7777 


HSW IT1 , 


7777 




0147 


00/5 


7777 


HSWIT2, 


7777 




0150 


0076 


7777 


HSW 1 T3 i 


7777 




0151 


0077 


7777 


HSWIT4, 


7777 




0152 


0100 


0066 


SELPTR , 


SELDV0 




0153 


0101 


3461 


KHL.TMS » 


HLTMS 


/CAL SR TO PUT 


0154 










/HALT MESS IN 


0155 










/TTY QUE 


0156 


0102 


3507 


KGOMS, 


GOMS 


/CALL GO MESS 


0157 


0103 


0000 


MODE, 


0 


/MODE WORD 0* 


0160 










/PAUSE 7777«A\D 


0161 


0104 


0000 


TEMP, 


0 




0162 


0105 


1033 


KQUPUT. 


QUPUT 


/CALL SR TO PUT 


0163 










/A MESS IN QUE 


0164 


0106 


6015 


KIN1 » 


INISTR-1 


/TOP INIT TABLE 


0165 


0107 


6143 


KBLKCT, 


BLKCNT 


/PTR TO -NUM OF 


0166 










/TBLKS IN BUF 


0167 


0110 


6144 


KLAST, 


LAST 


/ENTRY OF INIT 


0170 


0111 








/TABLE 


01/1 


0000 


AAAP0, 


0 


/1ST UNUSED PG 


01/2 










/0 CORE LUC 


01/3 








*»200 


/L MODE INTRUPT 


01/4 


0^00 


J352 


I NTL » 


UCA ASAVE 





0175 


0201 


7010 


RAR 






0176 


0202 


3351 


DCA 


LSAVE 




0177 


0203 


1040 


TAD 


40 


/MAKE LINC JMP 


0200 


0204 


0355 


AND 


P1777 




0201 


0205 


1354 


TAD 


P6000 




0202 


0206 


3274 


DCA 


RTNJMP 




0203 


0207 


6141 


LINC 


/SET UP LDF LIF 


02 04 






LMODE 


/FOR INTERRUPT 


020b 


0210 


0500 


IOB 




/RTN 


0206 


0211 


6234 


6234 




/RIB 


0207 


0212 


1060 


STA 


I 


/SAVE IB 


0210 


0213 


0000 


0 






0211 


0214 


0242 


ROL 


2 


/POSITION LDF 


0212 










/BITS 


0213 


0215 


0002 


PDP 






0214 






PMODE 




0215 


0216 


0350 


AND 


P37 




0216 


0217 


1347 


TAD 


ANLDF 




0217 


0220 


3271 


DC A 


RTNLDF 




0220 


0221 


1213 


TAD 


,•6 




0221 


0222 


7012 


RTR 




/POSITION LIF 


0222 


0223 


7010 


RAR 




/BITS 


0223 


0224 


0350 


AND 


P37 


0224 


0225 


1346 


TAD 


ANLIF 




022b 


0226 


3270 


DC A 


RTNLIF 




0226 


0227 


5234 


JMP 


SERVE 


/SERVICE INTRUP 


022 7 


0230 


3352 


INTP, DCA 


ASAVE 


/P MODE INTRUP 


0230 


0231 


7010 


RAH 






0231 


0232 


3351 


DCA 


LSAVE 




0232 


0233 


7040 


CM A 




Z7777 FOR PMODE 


0233 










/0000 FOR LMODE 


0234 


0234 


3345 


SERVE, DCA 


INTMOD 


/INTERRUPT 


023b 


0235 


6131 


CLSK 


/CLOCK ? 


0236 


0236 


7410 


SKP 






0237 


02 3 7 


5275 


JMP 


TISA 


/YES SERVICE 


0240 










/DEVICES 


0241 


0240 


7300 


TIRTN* CL A 


CL L 




0242 


0241 


6031 


KSF 




/KEYBOARD ? 


0243 


0242 


5245 


JMP 


CHKTTY 




0244 


0243 


6036 


KRB 




/YES GET CHAR 


024b 


0244 


3021 


DCA 


KBDBUF 




02 4 6 


0245 


6041 


CHKTTY, TSF 




/TTY ? 


0247 


0246 


5256 


JMP 


INTOUT 


/NO EXIT 


0250 


0247 


6042 


TCF 




/CLR FLAG 


0251 


0250 


1420 


TAD 


I ADMESS 


/NXT CHAR 


0252 


0251 


7 45 0 


SNA 




/MORE TO TYPE ? 


0253 


02 52 


5255 


JMP 


,+3 


/NO 


0254 


0253 


6046 


TLS 






0255 


0254 


20 20 


ISZ 


ADMESS 


/SET PTR FOR 


0256 










/NEXT CHAR 


0257 


0255 


3022 


DCA 


TTYFLC 


/SET TTY FLAG 


0260 










/0 MEANS TTY 


0261 










/NOT BUSY 


0262 


0256 


1351 


INTQUT, TAD 


LSAVE 


/RTN FROM 


0263 


0257 


7004 


RAL 




/I NTERRUPT 


0264 


0260 


1352 


TAD 


ASAVE 




0265 


0261 


2345 


ISZ 


INTMOD 


/P OR L MODE ? 


0266 


0262 


5266 


JMP 


OUTL 


/L MODE 


0267 


0263 


6244 


RMF 






0270 


0264 


6001 


ION 






0271 


0265 


5400 


JMP 


I 0 




0272 


0266 


6141 


OUTL. L INC 






0273 


0267 


0006 


6 




/DJR 



0274 


0270 


0000 


RTNI IF. 


02 75 


0271 


0000 


RTNILDF > 


0276 


0272 


0500 

IU -S IC tc 




0 2 77 


0273 


6001 




0 300 


0 27 4 

10 c / ~ 


0000 
KJIU 10 10 


RTM IMP . 
n 1 IN J 1*1 r | 


0301 

%J \J *J X 








0302 








0303 








03 04 








0305 


02 75 


61 3<5 


T T S A . 
1 1 O A » 


0306 


02 76 


30 26 




0307 


02 77 


1026 




0310 


0300 


0066 




0311 


0301 


7450 




0312 


0302 


5321 

w & J. 




0313 


0303 


3027 

w If C / 




0314 


0304 


4430 

~ J V L' 




0315 








0316 








0317 


0305 


011 0 
» X X 10 




0320 


0306 


M 11 4 

10 X A ~ 




0321 


0 30 7 

yj o iu f 


0000 
fcl 10 10 |0 


or u v vj i 


0322 








0323 


0^10 

&> O X 10 


H 0 0 (71 
W 10 10 Hi 


r\ o p u v io i 


03?4 








0325 


1 


If If 10 10 


U T n W (A 
n i U V 10 • 


0 32 6 








0327 








03 30 








0331 


0 312 


0000 


1 ODV0 . 

L V U V IO « 


0332 








0333 








0334 


0313 


0000 


OSDV 0 . 

www™ K/ f 


0335 








0336 


0314 


0000 
ty */ iv io 


fi nn \/0 . 

uu UU V 10 » 


0337 


0 315 

lu w A 


0000 

K/ 10 10 |0 


c. n l U V lo t 


0 340 


0 316 


5321 




0341 








03 42 








0343 








0344 


0317 


3066 


HI THV0 . 
nu. i U v io » 


0345 








0346 


w J c iy 






034 7 


0321 


1026 


n v i . 

U V A | 


0350 


0322 


0067 




0351 


03 23 


7 4 50 




0 35 2 


10 vj £ ~ 


J 1 w o 




0353 


0 ^ y ^ 






0354 


0 32 6 






0355 








0356 








0357 


0 32 7 


Z 11 1 

w A A A 




03 6 0 


0330 


0115 




0361 


0331 

VJ Kl w X 


10 10 10 |0 


crnu 1 . 
or u v i # 


0362 








0363 


033 2 


If 10 10 10 




0364 








0365 


0333 


0000 


U T DV la 
n i u v x > 


0366 








0367 








0370 








0371 


0334 


0000 


L0DV1, 


0372 









0 
0 

500 / 1 OB 

I ON 

0 







/DATA 






/Af fill 7C1 T tflM 

/AWWUioAl 1 UN 






/oLH V I ut 






/ n r u t pre 

/ "tV A U t O 


PI SA 




/c. a \y r 

' 3M V t 


nr a 


CTATIIC 
3 ! M I VJ o 


/ p 1 D PK D t T? 


t a n 

1 M U 


C T A 1 1 IC 
31 HI U3 


/ r u v n \/ (?i 
/ 0 nr\ U V lo 


AMD 

M IN U 


cri n\/0 
acuu v to 


/ 3 tL t w 1 WU U V X3 


CM* 
O IN M 




✓ R r a n v 9 

/ n t A U T f 


IMP 




/NO l-U IU UVi 


nr a 


nwTv p 

UV 1 I " 


f 0 A V L I T rfc. 


j ri a 




/P A I I T M PI I T 

f l> ALL i NrU i 






/ r A" An L 1 o 1 






f Ut V I CL w 


A (7101 
1 1010 


y a y nun 
A AAUV t> 


/v aVtC Cam 
/ A A /v i 0 0 An 


'1 [A (71 


v a v n u 01 
T A A U V *> 


' T AX J o SAM 


171 
It) 




/CAM 

/o AM 






/ r H LU vVAHJ 


(71 




/Cam 
r o A n 






/ r HtU \ r I At \J) 


(71 
10 




'12 oil Bur r t H 






/AnnD d q . d «i 1 
/ADUH DyaolA 






/Ur HI OKU 






/ i 0 U A I A r LU 


10 




/ X.C Oil A U U n 






/ w i I n 1 In UA 1 A 






f r i tLU 


10 




' 0 LU 






/¥ Ayr*; Ram 
/A AAjo OAn 


(71 




/I ACT 

/L AS 1 


(71 

lo 




/piata a nno 
/UA 1 A AUQK 


1 M D 

J n r 


U V 1 


/MtRL TO 






/CALL DV 1 






/uror TPi ui t 
/Mtnt |U HL! 






/Utv iCL k) 


nr a 

UU M 


cri nwoi 
3tLU ¥B 


/(7i nrcn tptc 
f *i U to tL LU 1 o 






/A HPV/TPP 

/A □ t V I L t 


n p a 
UU A 


now 1 TIO 


/Cr T nil* cyjT 

/ot I HALT oW J l 


t a n 
T AU 


e t * t i ie 
o T A TUo 




a m n 
A IN U 


o tLUVl 


/SELECT WU Ovl 


oN A 




/or* rw "> 
/H t A U Y f 


1 M D 

Jnr 


I KDV2 


/NO GO TO DV2 


p p a 
DC A 


QVT Yr 


/SAVE TYPE 


1 M C 

Jno 


I K I NPU r 


/Mil 1 ? MQHT 

/CALL INPUT 






/ D A □ A M 1 T C T 






/nru i ft' 1 

f utv lit A 


1 00 
X >o w 


y a y nv 1 


/y Ay j« QAM 

/ A AAjO OA I I 


1 00 

X <0 10 


y a y nu 1 

T M A U V X 


/V AVlC CAM 

/I A a J a oAn 


0 

10 




/CAM 

/OAn 






rf nuu \VfAn# 


0 




/SAM 






/FREQ (FIXED) 


0 




/15 BIT BUFFER 






/ADDR B9-B11 






/OF HI ORD 






/IS DATA FLD 


0 




/12 BIT ADDR 






/WITHIN DATA 



0373 












/fi eld 


03 74 


0335 


0000 


0SDV1# 


0 




/OLD 


0375 












/X AXIS SAM 


03 7 6 


0336 


0000 


ELODVl. 


0 




/LAST 


0377 


0337 


0000 


EHIDV1 . 


0 




/DATA ADDR 


0400 


0340 


5753 




JMP 


I KDV2 


/HERE TO 


0401 












/CALL DV2 


0402 












/HERE TO HLT 


0403 












/DEVICE 1 


0404 


0341 


3067 


HLTDVli 


DCA 


SELDV1 


/0 DESELECTS 


0405 












/A DEVICE 


0406 


0342 


7001 




I AC 




/SET HALT SWIT 


0407 


0343 


3074 




OCA 


HSW I Tl 




0410 


0344 


5753 




JMP 


I KDV2 


/NXT DEVICE 


0411 


0345 


0000 


I NTMOD » 


0 






0412 


0346 


0600 


ANLI F » 


600 






0413 


0347 


06 40 


A N L o r ■ 


640 






0414 


0350 


0037 


P37 i 


37 






0415 


0351 


0000 


LSAVE » 


0 






0416 


0352 


0000 


ASAVE » 


0 






041/ 


0353 


0400 


KDV2 » 


DV2 






0420 


0354 


6000 


R6000 , 


6000 






0421 


0355 


1777 


P1777i 


1777 






0422 








»4 00 






0423 


0400 


1026 


DV2, 


TAD 


STATUS 


/CHK 0V2 


0424 


0401 


00 70 




AND 


SELDV2 


/SELECT WD DV2 


0425 


0402 


74 50 




SNA 




/READY ? 


0426 


04 03 


5223 




JMP 


DV3 


/NO GO TO DV3 


0427 


0404 


3027 




DCA 


DVTYP 


/SAVE TYPE 


0430 


0405 


4430 




JMS 


I K INPUT 


/CALL INPUT 


0431 












/ PARA M LIST 


0432 












/DEVICE 2 


0433 


0406 


0112 




100 


XAXDV2 


/X AXIS SAM 


0434 


0407 


0116 




100 


YAXDV2 


/Y AXIS SAM 


0435 


0410 


0000 


SFDV2 » 


0 




/SAM 


0436 












/FREQ (VAR) 


0437 


0411 


0000 


KSFD V2 » 


0 




/SAM 


0440 












/FREQ (FIXED) 


0441 


0412 


0000 


HIOV2, 


0 




/15 BIT BUFFER 


0442 












/ADDR B9-B11 


0443 












/OF HI ORD 


0444 












/IS DATA FLD 


0445 


0413 


0000 


L00V2* 


0 




/12 BIT ADDR 


0446 












/WITHIN DATA 


0447 












/FIELD 

' « 1 W LU 


0450 


0414 


0000 


0SDV2, 


0 




/OLD 


0451 












/X AXIS SAM 


0452 


0415 


0000 


EL0DV2 » 


0 




/LAST 


0453 


0416 


0000 


EHIDV2 , 


0 




/DATA ADDR 


0454 


0417 


5223 




JMP 


DV3 


/HERE TO 


0455 












/CALL DV3 


0456 












/HERE TO HLT 


0457 












/DEVICE 2 


0460 


04*0 


3070 


HLTDV2, 


OCA 


SEL0V2 


/0 DESELECTS 


0461 












/A DEVICE 


0462 


04*1 


7105 




CLL 


1AC RAL 


/SET HALT SWIT 


0463 


0422 


3075 




DCA 


HSWI T2 




0464 


0423 


1026 


DV3, 


TAD 


STATUS 




0465 


0424 


0071 




AND 


SELDV3 


/SELECT WD DV3 


0466 


0425 


7450 




SNA 




/READY ? 


0467 


0426 


5*46 




JMP 


DV4 


/NO GO TO DEV4 


0470 


0427 


3027 




OCA 


DVTYP 


/SAVE TYPE 


0471 


0430 


4430 




JMS 


I K1NPUT 


/CALL INPUT 



0472 












/P AR AM LIST 


0473 












/DF V I PF 1 


0474 


0431 


0113 




100 


X AXDV3 


/X AXIS SAM 


04/5 


0432 


0117 




100 


YAXDV3 


/Y AXIS SAM 


0476 


0433 


0000 


SFDV3, 


0 




/SAM 


0477 












/FRFO (VAR) 


0500 


0434 


0000 


KSFDV3 i 


0 




/SAM 


0501 












/FREQ ( F I XED ) 


0502 


0435 


0000 


HI DV3, 


0 




/15 RTT RUFFFR 


0503 












/ADDR B9»B11 

'WWW" W 7 W D XJl 


0504 












/OF HI ORD 


0505 












/IS DATA FLD 


0506 


0436 


0000 


L0DV3» 


0 




✓1? R 1 T AnDR 


0507 












/WITHIN nATA 


0510 












/ F T F 1 D 


0511 


0437 


0000 


0SDV3 , 


0 




/OLD 

' w U W 


0512 












/X AXIS SAM 


0513 


0440 


0000 


EL0DV3 , 


0 




/LAST 


0514 


0441 


0000 


EHIDV3i 


0 




/DATA ADDR 


0515 


0442 


5246 




JMP 


DV4 


/HERE TO 


0516 












/CALL DV4 


0517 












/HERE TO HLT 


0520 












/DEVICE 3 


0521 


0443 


3071 


HLTDV3 » 


OCA 


SELDV3 

«n* £» km W V W 


/0 nrsn CTTS 


0522 












y a nrw irr 


0523 


0444 


7125 




STL 


TAP R A |_ 


/SFT MAI T SW T T 


0524 


0445 


3076 




DP A 

U w M 


WSW I T3 




0525 


0446 


1026 


DV4 , 


TAD 


STATUS 




0526 


0447 


0072 




AND 


SELDV4 


/SFLFCT WD DV4 


0527 


0450 


7450 




SNA 




/READY ? 


0530 


0451 


5672 




JMP 


I EX IT 


/NO EXIT 


0531 


0452 


3027 




DCA 


DVTYP 


/SAVE TYPE 


0532 


0453 


4430 




JMS 


I KINPUT 


/CALI INPUT 


0533 












/PAR AM LIST 


0534 












/DEVITE 4 


0535 


0454 


0120 




100 


XAXDV4 


/x axis Sam 


0536 


0455 


0124 




100 


YAXD V4 


/ Y Ay IS AM 


0537 


0456 


0000 


SFDV4 , 


0 




/SAM 


0540 












/FREQ (VAR) 


0541 


0457 


0000 


KSFDV4 , 


0 




/SAM 


0542 












/FREQ (FIXED) 


0543 


0460 


0000 


HI0V4, 


0 




/15 RIT RUFFFR 


0544 












/ADDR B9=>B11 


0545 












/OF HI ORD 


0546 












/IS DATA FLD 


0547 


0461 


0000 


L0DV4 , 


0 




/12 BIT ADDR 

Dl | WWW" 


05 50 












/WITHIN nATA 


0551 












/F T Fl n 


0552 


0462 


0000 


QS0V4, 


0 




/OLD 
' w u w 


0553 












/X AXIS SAM 


0554 


0463 


0000 


EL00V4, 


0 




/LAST 


0555 


0464 


0000 


EHIDV4, 


0 




/DATA ADDR 

r WW 1 W W W W i > 


0556 


04 65 


5672 




JMP 


I EXIT 


/HFRF TO 


0557 












/EXIT 


0560 












/HFRF TO HLT 

' M U n L 1 W M W I 


0561 












/ D F V I C F 4 


0562 


0466 


3072 


HLTO V4 # 


DC A 


SF LDV4 


/0 flFSF 1 FT TS 


0563 












/a n f v i r f 


0564 


04 67 


7107 




CL L 


IAC RTL 


/SFT H Al T SW I T 


0565 


0470 


3077 




DCA 


HSWI T4 




0566 


0471 


5672 




JMP 


I EXIT 




0567 


04 72 


0240 


EXIT. 


TIRTN 




05 70 . 


0473 


6002 


Di 


IOF 




/D KEY 



om 7 1 
lop / 1 


01 4 7 4 
0 4/4 


A 1 A -I 

0141 




LINC 




/START DIAL 


10 P / c. 








LMODE 




Dl S 7 < 

10 P / o 


01 4 7 h 


01 M 01 1 




AXO 






13 5 / 4 


01 4 7 A 
0 4/0 


Ol A Ol O 
0O0ii 




LIT 


2 




t> ~7 K 
0 3 / P 


M 4 7 7 
0 4 / / 


00 1 P 




JMP 


DIAL 




0P / 0 








PMOOE 


/P KEY 


fA Si 7 7 

0P / / 


/^t c; rA fA 
0P00 


A 1 A CA 

1/40 


P » 


TAD 


I KPOLAR 


/POLARITY WD 


0000 


0P01 


1 04 0 




CMA 




/FLIP SPECTRUM 


fAtfll 

00 0 1 


oi n oi 'J 
0P 0 c 


0/40 




OCA 


I KPOLAR 




nidi') 
I0OI02 


01 K M < 
I0P 100 


1 7 4 M 
1/40 




TAD 


I KPOLAR 


/IS SPECTRUM 


171 A 01 7 
100100 


01 C, 01 4 

10 P 10 4 


7 A 4 01 
/ 0 40 




S if A 


CLA 


y t kit/ rD *r r n n 

/INVERTED ? 


01 A (7 A 

10 0 10 4 


10 p 10 P 


K t -t Ol 
PO10 




JMP 


,♦3 




01 A 01 K 
10 OIO 9 


01 K 01 A 
0 PIO O 


1040 




TAD 


NORMS 


/NO NORM MESS 


01 A 01 A 
10 0 10 0 


01 R 01 7 
10 P 10 / 


7 4 •! 01 
/ 4 1 0 




SKP 




/TO QUE 


01 A 01 7 
000 / 


Ol K 1 Ol 
0P 1 V 


1 < 4 4 

10 44 




TAD 


INVMS 


/YES INVERT 


01 A 1 Ol 
0010 












/MESS TO QUE 


tit ( 1 
0011 


Ol K 1 1 
0P11 


4 K 01 R 

4 P 0 P 


1/ C V O Y M 

Kt YH TN > 


JMS 


I KQUPUT 




01 A -1 O 

0612 


0P12 


K 7 1 "I 

p/lo 


cX I T , 


JMP 


I .♦! 


/CROSS PAGE 


01 A 1 1 
0010 


oi e; 1 7 
0P 1 0 


■I 'J 01 1 
l£0O 




OPKRTN 


/RTN 


061 4 


0 514 


•1 7 1 ■? 

1 70 7 


F » 


TAD 


I KFREO 


/F KEY 


01 A i K 
001? 


0P 1 P 


7 01 A fA 
/040 




CMA 




/COM FREEZE WD 


01 A -1 A 
0 010 


01 c: * A 
0P 10 


■< 7 1 7 

0 / 0 7 




DC A 


I KFREO 




00 1/ 


0P 1 / 


4 7 17 
1/0/ 




TAD 


1 KFREO 


/IS SPECTRUM 


01 A O 01 

0020 


OI K Q 01 
0P C 0 


7 A 4 01 
/O 70 




S2A 


CLA 


/FROZEN ? 


loo ^l 


01 K ^ 1 
0P 21 


PO <£4 




JMP 


,♦3 




01 A O O 

0022 


0P 2c 


1041 




TAD 


MOTMS 


/NO MOTION 


01 A 9 ~i 


lo P <c o 


7 4 i 01 
/ 4 10 




SKP 




/urPr "PA Mi ir 

/MESS TO QUE 


oi A o 4 

0024 


0P 2 4 


A "i A O 

10 4<i 




TAD 


FRMS 


/YES FREEZE 


01 A OC 

00 2P 


oic; o fc, 
0P cP 


Es < -t 1 

PO 11 




JMP 


KEYRTN 


/MESS TO QUE 


U A 'J A 

0 0<: 0 


oi K 'j a 
0 Pc 0 


1 1 01 7 

110 0 


c 

S i 


TAD 


MODE 


/S KEY 


01 A O *7 

062 / 


f?i C O "7 
0P2 / 


7640 




S2A 


CLA 


/PAUSE MODE ? 


01 A 1 01 

■0 0 0 0 


Ol K < // 

0 P 0 to 


P 0 1 d 




JMP 


ZXI T 


/NO IGNORE S 


Ol A ■<[ 1 

00 ol 


Ol K "< 1 

0P 01 


a r/ oi o 

00 ]£)C 




IOF 




/YES CALL QA 


Ol A < 5 
I0OO<£ 


om < p 
10 P 0 c 


h 7 4 K 
P / 4 P 




JMP 


I KSETUP 


/Cf tub oni iTC 

/SETUP ROUTS 


7 A < < 

<c o oo 


01 S Tl < 
10 O 0 


1 1 01 * 
1100 


IJ 


TAD 


MODE 


/W KEY 


Ol A T6 A 
0004 


oi c; 4 
0 P 0 4 


7 A 4 01 
/ 0 4 0 




SZA 


CLA 


/PAUSE MODE ? 


0 0 J 5 


0POP 


Po 12 




JMP 


ZXIT 


/NO IGNORE W 


M A K A 
0 0 00 


01 ti < A 

0 P 0 0 


4 7 4 A 
P / 4 0 




JMP 


I KWR I T 


/YES CALL 


Ol A 7 7 
0 0 0/ 












/i in i Tr n a i i t o 

/WRITE ROUTS 


Ol A 4 Ol 
10 0 4 10 


oi < 7 
0 P 0 / 


5 01 4 01 
A 0 4 0 


i/rnrn 

Kr HLO # 


FREEHE 


Ol A 4 1 
10 0 41 


01 K 4 01 
10 P 4 10 


o y a a 


Kr ULAN * 


POLAR 




fA A O 


0 P 41 


114 7 

ooio 




MSMOT 




Ol A 4 7 
10 0 4 0 


oi c; 4 5 
10 P 4 £ 


A A 1 A 

0024 


roue 


MSFR 






Ol A 4 4 
10 O t *» 


OIK 4 7 
10 P *» 0 


A A 7R 
O 0 0 P 


modmc 


MSNQR 




Ol A 4 K 
lO 0 4 P 


om 4 4 
lO P 4 4 


A A 4 A 

0 0 4 0 


I NVMb » 


MSINV 




CA A 4 A 

00 to 


0 P 4 P 


4 01 O 1 

4020 


K5L TUP # 


SETUP 




M A 4 7 
0 0 4 / 




4 4 01 01 

4 4 0 0 


KWR I T » 


WRIT 






0 OP 0 








»600 




/GET INPUT FROM 


oi a c; 1 
WO PI 


M A Ol Ol 
0 0 10 10 


01 01 01 01 
I0B 00 


t MO 1 IT 


0 




/DEVICE K 


(A A k» 'J 

I0OP c 












/GET PARAMETER 


Ol A K < 

0oPo 












y I VA<V r* n i« A » t I 

/LIST FROM CALL 


Ol A /l 

0 OP 4 


tA A Ol A 
0 601 


H A /T! /Tl 
1600 




TAD 


I INPUT 


00 PP 


fA A f/> O 

06 02 


v5o 00 




OCA 


SAMX 


/X AXIS SAM 


06 PO 


06 03 


22 00 




ISZ 


INPUT 


10 0 P / 


01 A 01 4 
10 0 V) 4 


1 A 01 01 
10 00 




TAD 


I INPUT 




Ol A A Ol 

lo o o io 


01 A 01 

!o 010 P 


02 P4 




DC A 


SAMY 




00 Ol 


00 00 


2 200 




I S if 


INPUT 




Ol A A ' J 

looo 2 


01 A !A 7 
0 0 10 / 


12 00 




TAD 


INPUT 


/PTR TO 


01 A A '< 
i) u u O 


10 O X <i> 


J003 




DCA 


FJREO 




0664 












/LAST COUNT 


066p' 












/(VAR) 


0666 


0611 


2200 




ISZ 


INPUT 




066.7 


06.12 


1200 




TAD 


INPUT 


/PTR TO 



0670 


0613 


3334 




DC A 


KFREQ 


/SAM FREQ 


0671 












/ ( F I XEQ ) 


0672 


0614 


2200 




ISZ 


INPUT 


/PTR TO 


0673 


0615 


1200 




tad 


I NPUT 


/BUFFER 


0674 


0616 


3331 




dca 


CDFVAL 


/CDF BITS 


0675 


0617 


2 2 00 




1 sz 


I NPUT 


/PTR TO 


0676 


0620 


1200 




TAD 


INPUT 


/BUFFER 


0677 


0621 


3330 




DCA 


ADDR 


/ADDR 


0700 


0622 


2200 




ISZ 


I NPUT 




0701 


0623 


1200 




TAD 


I NPUT 




0702 


0624 


3327 




DCA 


OLDSAM 


/PTR TO OLDSAM 


0703 


0625 


2200 




I SZ 


I NPUT 


0704 


0626 


1600 




TAD 


I INPUT 


/PTR TO 1 AST 


0705 


0627 


3332 




DCA 


endlo 


/DATA ADDR 


0/06 


0630 


2200 




ISZ 


I NPUT 




0707 


0631 


1600 




TAD 


I INPUT 




0710 


0632 


3333 




DCA 


ENDHI 




0711 


0633 


2200 




ISZ 


I NPUT 


/FIRST RTN IS 


0712 












/jmp to nv K + 1 

f Will IW _ W V • ' ~ A 


0713 












/2ND I S W! T nVK 


0714 


0634 


1027 




TAD 


DVTYP 


/ANALOG 


0715 


0635 


7 710 




SPA 


CLA 


/OR ENCODED ? 


0716 


0636 


5302 




JMP 


ANALOG 




0717 


0637 


2735 


ANARTNi 


ISZ 


I FREQ 


/READY TO SAM 


0720 












/ Y AXIS ? 


0721 


0640 


5600 




JMP 


I INPUT 

A * III V 1 


f IV V l)U t u 


0722 












/D V K*l 


0723 


0641. 


1734 




TAD 


I KFREQ 


/RESET FREQ 


0724 


0642 


3735 




DCA 


I FREQ 


/FOR NXT PASS 


072 5 


0643 


173 0 




TAD 


I ADDR 




0726 


0644 


3336 




DCA 


MOl D 


/RiiEFFR AnnR 
' our r c n m u u n 


0727 


0645 


1731 




TAD 


I CDFVAL 


/setup rnr 


0730 


0646 


7104 




CLL 

V U U 


RAL 




0731 


0647 


7006 




RTL 






0732 


06 50 


1031 




TAD 


CDF0 




0733 


0651 


3252 




DCA 


.♦1 




0734 


0652 


0000 




0 




/CDF N 


0735 


0653 


6141 




LI NC 




0736 


0654 


0000 


SAMY, 


0 




/SAM Y AXIS 


0737 


0655 


0002 




2 




/POP 


0740 


0656 


3736 




DCA 


I HOLD 


/PUT IN DATA 


0741 












/BUFFER 


0742 


0657 


6201 




CDF 


0 


/REST ORE FID 0 


0743 


0660 


1332 




TAD 


ENDLO 


/DVK IS FINI 


0744 












/WHEN CURRENT 


0745 


0661 


1730 




TAD 


I ADDR 




0746 


0662 


7640 




SZA 


CLA 


/ ( CDFV AL • ADDR ) 


0747 


0663 


5273 




JMP 


NFDVK 




0750 


0664 


7004 




RAL 






0751 


0665 


1333 




TAD 


ENDHI 


/sTFRMlWil AnnR 
» ■* i c. n n i im ^ u «uun 


0752 












/ ( e wn w I • 


0753 


0666. 


1731 




TAD 


I CDFVAL 


/ENDL Q ) 


0754 


0667 


7640 




SZA 


CLA 




0755 


0670 


5273 




JMP 


NFDVK 




0756 


0671 


2200 




ISZ 


INPUT 


/FINI DV K 


0757 


0672 


5600 




JMP 


I INPUT 




0760 


0673 


7101 


NFDVK* 


CLL 


I AC 


/ A D V PUR RFNT 


0761 


0674 


1730 




TAD 


I ADDR 


/ADDR 


0762 


0675 


3730 




DCA 


I ADDR 




0763 


0676 


7004 




KAL 






0764 


0677 


1731 




TAD 


I CDFVAL 




0765 


0700 


3731 




DCA 


I CDFVAL 




0766 


0701 


5600 




JMP 


I INPUT 


/NORMAL RTN 



07 67 


0702 


6141 


ANALOG* 


0 7 7.0 


0703 


0000 


SAMX, 


0 7 71 


0 70 4 


0002 




0 7 72 


0705 


1326 




0 774 


0 /06 


3325 




0774 


0707 


1727 




07 75 


0710 


7041 




07 76 


0711 


1325 




0 777 


0712 


7540 




100.0 


0713 


5320 




1001 


0714 


1324 




1002 


0715 


7710 




1003 


0716 


2200 




1004 








10 0b 


0717 


5600 




1006 


0720 


7200 


CHGSAM, 


1007 


0721 


1325 




1010 


0722 


3727 




1011 


0723 


52 3 7 




1012 








1013 


0724 


0020 


MAXDRP , 


1014 


0725 


0000 


NEWSAM, 


101!? 


0726 


10 00 


P1000I 


1016 


0727 


0000 


OLDSAM, 


1017 


0730 


00 00 


ADQR , 


1020 


07 31 


0000 


CDFVAL , 


1021 


0732 


0000 


ENDLQ. 


1022 


0733 


0000 


ENOHI , 


1023 


0734 


0000 


KFREQ » 


1024 


0735 


0000 


FREQ, 


1025 


0736 


0000 


HOLD, 


1026 








1027 


1000 


0000 


MESCHK , 


1030 


1001 


1025 




1031 


1002 


7650 




1032 


1003 


5600 




1033 


1004 


1420 




1034 


1005 


7640 




1035 


1006 


5600 




1046 


100 7 


1022 




1037 


1010 


7640 




1040 


1011 


5600 




1041 


1012 


1424 




1042 


1013 


3020 




1043 








1044 


1014 


10 24 




1045 


1015 


2024 




1046 


1016 


1265 




1047 


1017 


7640 




1050 


1020 


5223 




1051 








1052 


1021 


1264 




1053 


1022 


302 4 




1054 


1023 


7240 




1055 


1024 


1025 




1056 


1025 


3025 




1057 


1026 


1420 




1060 


1027 


2020 




1061 


1030 


6046 




1062 








1063 








1064 


1031 


3022 




1065 









L1NC 




0 




/SAM X AXIS 


2 




/POP 


TAD 


P1000 


/MAKE POS 


DC A 


NEWSAM 




TAD 


I OLDSAM 


/CHK FOR 1 BIT 


CIA 




/INCREASE 


TAD 


NEWSAM 




SMA 


Si A 


/X AXIS READY ? 


JMP 


CHGSAM 


/YES 


TAD 


MAXDRP 


/CHK FOR 


SPA 


CLA 


/TOO FAR ? 


IS2 


INPUT 


/YES ADV TO 






/HALT RTN 


JMP 


I INPUT 


/NO GO TO DVK*1 


CIA 




/UPDATE 


TAD 


NEWSAM 


/Ql R <5A M 


DC A 


I OLDSAM 




JMP 


ANARTN 


/NOW CHK Y 






/AXIS 


OR PM AX 

m 


/MAX X AX DROP 


1000 







0 
0 
0 
0 
0 
0 
0 
0 



*1000 




0 




/TTY CHK 


TAD 


QUECNT 


/IS QUE EMPTY ? 


SNA 


CLA 




JMP 


1 MESCHK 


/YES XIT 


TAO 


I ADMESS 


/NO IS A MESS 


SEA 


CLA 


/IN PROCESS ? 


JMP 


I MESCHK 


/YES XIT 


TAD 


TTYFLG 


/NO IS A CHAR 


SZA 


CLA 


/IN PROCESS ? 


JMP 


I MESCHK 


/YES XIT 


TAD 


I QUEOUT 


/NO NEXT MESS 


DC A 


ADMESS 


/TO BATTERS 






/BOX 


TAD 


QUEOUT 


/ADV QUEOUT TO 


ISZ 


QUEOUT 


/NEXT MESS 


TAD 


ENQUE 


/IF AT END OF 


SZA 


CLA 


/QUE ADV TO GO 


JMP 


,*3 


/DO NOT COLLECT 






/$200 


TAD 


STQUE 




DCA 


QUEOUT 




STA 




/BACK UP COUNT 


TAD 


QUECNT 




DCA 


QUECNT 




TAD 


I ADMESS 


/KICK OFF 1ST 


ISH 


ADMESS 


/CHAR 


TLS 




/INTERRUPTS 






/WILL CARRY THE 






/BALL FROM HERE 


DCA 


TTYFLG 


/SET FLAG TTY 



/IS BUSY 



1066 


10 32 


5600 




JMP 


I MESCHK 




1067 












/INPUT mfss 


1070 


1033 


0000 


QUPUT i 


0 




/to our 

r 1 w UwC 


1071 


1034 


3266 




DCA 


QSAVE 


/SAVE ADDR 


1072 


1035 


1025 




TAD 


QUECNT 


/CHK FOR QUE 
r v n r\ run uuu 


1073 


1036 


1262 




TAD 


QUEMAX 


/FULl 


1074 


1037 


7450 




SNA 




/l Si OT 1 TFT ? 


1075 


1040 


5257 




JMP 


TBUS Y 


/YES INPUT BUSY 


1076 












/MFSS 


1077 


1041 


7700 




SMA 


CL A 


/FULl ? 


1100 


1042 


5633 




JMP 


I QUPUT 


/YFS INHTRIT MS 


1101 


1043 


1266 




TAD 


QS AVF 


/WO T MPIIT MFSQ 
f IN U 1 IN r U 1 HtOO 


1102 


1044 


3423 


i NMESS. 


n r a 


T our T w 

I W Ub I IN 


/TO nriF 


1103 


1045 


1023 




T a n 

1 M U 


QUF T N 


/IS OUT T M AT 
/ 13 W U L i IN A I 


1104 


1046 


1265 




TAD 


ENQUE 


/GO ? 


1105 


1047 


7640 




SI A 


CL A 




1106 


1050 


5254 




JMP 


. +4 




1107 


1051 


1264 




TAD 


STQUE 


/YFS TOI 1 FCT 


1110 


1052 


3023 




OCA 


QUE I N 

* WU i in 


/S200 

f <J? C V MJ 


1111 


1053 


7410 




SKP 






1112 


1054 


2023 




I SZ 


Q UE I N 


/ADV PTR 


1113 


1055 


2025 




I sz 


QUECNT 


/ADV COUNT 

' nu r u w v IN l 


1114 


1056 


5633 




JMP 


I QUPUT 




1115 


1057 


7200 


TBUS Yi 


CIA 




/PUT RUSY 


1116 


1060 


1263 




TAD 


BUSYMS 


/MFSS IN QUF 


1117 


1061 


5244 




JMP 


INMESS 




1120 


1062 


7755 


QUEMAX » 


STRQUE»ENDQUE 


/ v Miy NllM OF 


1121 












/MFSS+1 


1122 


1063 


6676 


BUSYMS i 


MSBUSY 


/ADDR OF RUSY 


1123 












/MFSS 

f 1 1 U w O 


1124 


1064 


6373 


STQUE » 


STRQUE 




1125 


1065 


1362 


ENQUE » 


-ENDQUE 




1126 


1066 


0000 


QS AVE» 


0 






1127 


1067 


0000 


DOMT P p 


0 




/ WR I TF T A PF 


1130 


1070 


1507 




TAD 


I KBLKCT 


/oMUM to no 


1131 


1071 


3266 




DCA 


QSAVE 




1132 


1072 


1047 




TAD 


ARGHI 




1133 


1073 


3302 




DCA 


TPINST 




1134 


1074 


1046 




TAD 


ARGLO 




1135 


1075 


3303 




DCA 


TPWORD 




1136 


107 6 


1372 




TAD 


LDFSTR 




1137 


1077 


3301 




DCA 


TPLDF 




1140 


1100 


6141 


MTPLOP • 


LINC 




1141 








LMODE 




1142 


1101 


0000 


TPLOF> 


0 




/LDF N 

r »WP W 1 111 


1143 


1102 


0000 


TP I NST # 


0 




/MTP T NST 


1144 


1103 


0000 


TP WORD i 


0 




/MBLKNTBLK 


1145 


1104 


716 3 




JMP 


TPWAIT 




1146 


1105 


0011 




CL.R 




/I IKIK R I T 
/ U I IN l\ D I 1 


1147 


1106 


1020 




LDA 


I 


/ AO V TRI K . MRI K 


1150 


1107 


1001 




1001 


1151 


1110 


1200 




LAM 






1152 


1111 


1103 




TPWORO 




1153 


1112 


1560 




BCL 


I 




1154 


1113 


7000 


P7K# 


7000 




1155 


1114 


0450 




A ZE 




/TBI K WRAP ? 


1156 


1115 


7124 




JMP 


GOODY 


/NO 

/ IN U 


1157 


1116 


0011 




ClH 




/I T NK 
' L 1 INK 


1160 


1117 


3113 




ADD 


P7K 


/ Rll MRI K 


1161 


1120 


1200 




LAM 






1162 


1121 


1103 




TPWORD 




1163 


1122 


0450 




AZE 




/END OF DF ? 


1164 


1123 


7137 




JMP 


BYMBLK 


/NO 



1 1 Ab 


1 1 24 


04 79 




Let J 


yuQi 1/ LID A D 

/noEK WRAP 


1 1 A A 
110 0 










/in ai iAin p» 

/AROUND ? 


1 1 I 6 ! 7 

1 X o / 


1 1 95 


717 7 
' X 0 V 




iun nuuQi (/ 


y kip 

/NO 


1 1 /PI 

X X / KJ 


1 1 9 A 
X X «• D 


1 0PI 01 




i n a 
U U A 


/ YEb RESET 


1171 


1 19 7 
lit ' 


1 1 01 7 
X X 10 O 




t du d d n 


/MBLK 


117 9 
X 1 / C 


1 1 7 0I 
X 1 P 10 


1 A 9 0! 
1 O C. 10 




Bot I 




117"? 
11/0 


1171 
1 X O 1 


J PI 01 
"1 10 10 10 




4 01 ffl 0! 
*t 10 10 10 




1 1 74 
X X / *t 


114 9 


S 1 01 T 
9 X 10 O 




olC Tr WORD 




117 5 

X X ' 9 


117 7 


7 1 P1 1 

O 1 10 1 






/ a n vi i n c 
/ AD V UDr 


1 1 7 A 
x x / d 


117 4 

X 1 V *♦ 


1 1 90I 
1 1c 10 




a n A T 
AUA I 


1 1 77 
XX/' 


113 5 

1U^ 


01 PI 011 
■0 f 10 X 




1 
1 




1 9 PI PI 
X £ IW It) 


1 1 7 A 
J. 1 v O 


4 1 P1 1 
9 X 10 1 




b 1 C T rLDr 




1 POM 
1 e. 10 X 


117 7 
1 1 O / 


01 PI 019 
1010 |0c 




d n d 
r Ur 




1 9 019 








Dunnr 




1 9 0I7 


1 1 4 Oi 
1 1 *» 10 


9 9 A A 




I b c Ob AVE 


/DONE ? 


1 9 01 4 
Xc 10 t 


1 1 <a 1 
11 1 1 


4 7 01 ffl 
9 O 10 10 




JMP MTPuQr 


/NO 


1 9 015 


I 1 49 

II tt 


A1 41 
01 *H 




1 T MP 

LI N:C 


1 9 01 A 
1 c 10 0 








i m nn r 




1 9 01 7 
1 c 10 ' 


114 7 

11 *to 


1 01 0101 
1101010 




L.U A 




1 9 1 01 
Xc X 10 


114 4 
X 1 *1 *t 


I 1 0(9 

I I VJ c 




Tn ! MCT 

Ir I IM bT 




1 ? 1 1 
I'll 


1 1 45 
XX*'-' 


1 5 A01 
I-' O10 




DPI T 




12 12 


11 4 6 


7 7 A 7 
/ ' p / 




7 7 A 7 

fly/ 


/U BIT 


1 c 1 0 


114 7 
1 1 *t ' 


I 1 90l 

I I <£l0 




AHA T 

ADA I 




1914 
X & X 1 


I 1 5PI 

I I 910 


017 017 
10 / 10 / 




P U K 




1 9 1 K 
1& 1 9 


1 1 ^1 

1191 


m K9 
91 3 c 




STC i+l 




1 9 1 A 


1 1 K 9 
X 1 9 C 


MP1 01 01 
1010 1010 




01 


/STOP TAPE 


1917 
X £ X ' 


115 7 
1 1 9 P 


01 9 7 01 
10 C f ICS 




9 7 01 
C ' 10 


1 9 9 01 

1 c e. 10 


115 4 
11 9«f 


7 1 A "2 
'100 




JMr TPWAIT 




19 91 

X C C X 


1 1 55 
119 9 


01 01 01 & 
10 10 10 1 




r c r 
tor 




19 99 
X t, c c 


1 1 5A 
li^o 


1 PI 90! 
1 v C 10 




i n a t 
LU A I 


/AND CUR XQd 


1 ??7 
X c c o 


1157 


PlP) 1 01 
I0I0 1 10 




rVTMTD 

t a i pi | r 


/II CitC 

/ U b I To 


1 ??4 

X c c ~ 


1 1 ft 0) 
liou 


pi PI 0)1 
If tw 10 1 




A AU 




1 9 95 

X £ C J 


i 1 A 1 
X 1 O 1 


PI PI 019 
10 VJ 10 1 




on o 

r U r 




1 ??A 
x c c o 








DMnnr 




199 7 


1 1 A 9 
1 1 D c 


5 A A7 
9 0 0/ 




JMr I DOnTr 




1 9 7 0i 

x t o a 








UMDDE 




19 71 
X <£ o X 


I 1 A 7 

I I 0 O 


10 10 10 C 


T P U A T T 


rUr 




1 9 7 9 








rrlUUt 




1 C O P 


1 1 A 4 

not 


4 4A c; 
*> "O 9 




IMC f i/ i ni r 

JMb I K I DLE 




19 74 


1 1 A5 

X X O 9 


A 1 4 1 

P 1 *T 1 




1 T M P 

L I Ny 




197 5 
X & O 9 








i ka n n cr 




1 ? 7A 


1 1 AA 
X X o o 


01 01 01 A 
10 10 10 0 




D JK 




1 977 

X C Q 1 


1 1 A 7 
no / 


PI 4 1 A 
10 ft 1 O 




c T n 
b I U 




1 9 4 01 

1 c *♦ 10 


117 0! 
1 1 ' V 


7 1 A 

'10 0 




Jnr TPWAIT 




1241 

X <- *t X 


1171 
li/l 


API 010! 
u v VJ VJ 




i MD 01 
«J fir 10 




19 4 9 
1 <£ H c 








PMQDE 




1 9 4 ~< 


11 / c- 


01 A /J "K 

10 0*1 o 


i n P c t o 


F I RLDF 




1 944 

X C «T *» 








r Abe 




1 ?45 
X c •» > 


1 9 PI 01 
1 C VJ VJ 


PI PI 01 01 
10 w Icl 10 




oi 
10 


/1/rVDHADn CD 

/r\ETB0AHD §R 


1246 


12131 


1021 

X V Cm X 




Tin i/nnmir 


/ P ft T A PUAD 9 

f 1 A WHAM • 


124 7 




7 45PI 




■3 IN A 


1 250 


1 9PJ .7 


5 ftPI PI 

J W 10 10 


U r A n 1 IN I 


1 MD T KrvDBn 
Jnr I KtYpnU 


/MP V T T 

/NO X J T 


1251 

X £• X 


1 9014 


3 2 A 5 

P c O J 




n P A P U A D 
U-wA lynAn 


/bA VE 


195 9 

X C J £ 


1 9 PI 5 


1 0)9 1 
O V)£. 1 




np* d n d 1 1 r 


/CLR BUF 


1 9 5 4 
x c j o 


1 9 PI A 
X W P 


1 99 ^ 
X <£ c. o 




Tin PUDTAD 

TAU LHHTAd 


/START OF TABLE 




1 9 Pi 7 


< 9 9 4 
P C C ft 




nPA PUDDTO 


1 9 R 
1 £ 9 9 


1 9 1 (A 


1 A 9 il 
10i!«( 


P LID 1 f» □ 


TAH f ^UQOf D 

TAD I CHRPTH 


/SEARCH FOR 


1 95 A 

X c J O 


19 11 
X £ X X 


7 PI 4 1 
/ 10*t 1 




P T A 
W I A 


✓ M A T A l J 

/MATCH 


1257 


1212 


1265 




TAD CHAR 




1260 


1213 


22 24 




ISZ CHRPTH 


/ADV PAST JMP 


1261 


1214 


7650 




SNA CLA 


1262 


1215 


5220 




JMP MATCH 




126.5 


1216 


2224 




ISi CHRPTR 


/APV TO NXT CHR 



1 964 

ICO" 


1917 
XC X I 


5 y 1 pi 
y d lie) 




\ kj n nil ni O D 








1 o y Ri 


1 A 5 4 

10d!4 


MATCH 1 


TAD I CHRPTR 




/LOAD A JMP 


1 9 A A 


1 551 
X (1 £ X 


7599 
<xi.ee 




DCA ,+1 




/SERVE VIA 


1267 

X c u / 


19 9 2 

Iddd 


000101 
10 10 m idi 




0 




/ tun T M c T 

/JMP I No 1 


1270 


1 557 
Idc J 


1995 

1 d d y 


CHRTAB, 


KBDTAB 






19 71 


1 554 
iddi 


M 01 01(51 
Id) Id) Id) id) 


CHRPTR, 


0 






19 79 
X C 1 C 






/KEYBOARD LOOKUP TABLE 


FORMAT IS? 


1 9 7 X 






/LOCA, 


ASCII CODE 


OF 


OEFJNED CHAR 


1 y 7 a 

XC r 1 






/L0CA*1 


t JMP TO ROUT 


FOR CHAR 


XC 1 J 






/THE LOC CHAR IS IN 


TABLE SO IF NONE 


1 27A 






/MATCH 


THE DEFAULT CASE 


IS JMP I KEYBRD 


197 7 

XC 1 1 


1 95t 
led? 


(71 X (71 4 
Id) 0 Id) *t 


KBDTABi 


304 




/D 


X J Id) Id) 


1 y y a 

lddo 


Ci A 7 1 
9 0/1 




JMP I KD 




/START DIAL 


1 X I71 1 
X O Id) x 




f » 5 1 01 

Vic 110 




210 




/CNTRLNH 


1 A CI 9 


1 5 in 
It 0 Id) 


y d / *? 




JMP CTRLH 




/HLT ALL DVS 


X O *J o 


19X1 
idol 


01 X 1 (71 
ld)0 1 Id) 




310 




/H 


1 X (71 4 
X 0 Idl t 


1 579 
IdOd 


K 7 1 1 

9011 




JMP H 




/HALT 


1 X05 

1 O Idl y 


1977 
Id 00 


M 7 5 (71 

00 did) 




320 




/P 


1 0 id) 0 


15 7 4 

123** 


9067 




JMP I KP 




/POLARITY 


1 < I7I 7 
X Old) / 


1 97 t 

1 do 9 


(71 7 (71 £ 

Id) ofcj 0 




306 




/F 


1 X 1 (71 
X 0 X Id) 


1 5 7 A 
1 d 0 6 


U £. 7 rx 
9 0 / Id) 




JMP I KF 




/FREE2E 


1 31 1 

X O X X 


19X7 
X CO / 


171 X (71 7 
10 0 Id) / 




307 




/G 


iJid 


1 5 4 (71 

ldtW 


U7<| C 

9019 




JMP G 




/GO 


1 X 1 X 

X O X O 


ld*»l 


171 X 5 7 
Id) 0 d O 




323 




/S 


1X14 
X O X t 


15 4 5 


t> A 7 5 

90 7d 




JMP I KS 




/SETUP 


1019 


15/17 

1 d** 0 


(71 7 5 7 

0 32/ 




327 




/W 


1 X 1 A 


1 2 ** *» 


K A T 7 
9073 




JMP I KW 




/WRITE TAPE 


1X17 
X O X / 


1 y 4 s 


(71 7 151 7 
IdJOIdJO 




303 




/C 


1 X90 
X O d Id) 


1 y 4 a 

Idto 


RX45 
90*1d 




JMP C 




/CALL CATACAL 


1321 


1247 


03 1 5 

id) 0 x y 




315 




/M 


1322 


1250 


5347 




JMP M 




/CALL MAGSPY 


1 39 3 

X ^ <- w 


1251 

X c X 


017,1 4 
t) O X 7 




314 




/L 


1 X94 

X O c "t 


19^9 
xc j c 


R ^ R4 
9 O 9 *r 




JMP L 




/CALL LOADER 


XO C J 












/NUMERIC ARGS 


1 X 9 A 
X 0 d o 












/FOR H AND G 


1 tot 
X Od / 


1 9C7 

1 d9 0 


(71 5 A (71 
Id) d6 0 




260 




/0 


•1 X 1 01 
10 Old/ 


1 5 u / 
xc. 94 


K 7 0 <1 

9021 




JMP NUM 






X 0 O X 


1 5 C K 

1 d 9 9 


0 2 6 1 




261 




/I 


1 0 Od 


1 5 K A 

id 90 


K 7 5 1 

9321 




JMP NUM 






1 X X X 
X O O O 


1 9C1 

1 d 9 / 


(71 5 £ 5 

Wd 62 




262 






17 7 4 


1 0 A ra 

12 60 


2321 




JMP NUM 






1 X X 

x o o y 


1 5 A 1 

1 d 0 1 


01 5 ii 7 
Wdoo 




263 






1 X 1 A 
X O O U 


1 y a y 

idod 


K 7 5 1 

90 d 1 




JMP NUM 






1 X X 7 
X o o / 


1 y a x 
1 d 0 0 


(AO A A 
Id) d O ** 




264 






X O *♦ Id) 


1 y a 4 
1 CO H 


(^ < 5 1 

9 021 




JMP NUM 






1 < A 1 


4 5 £ U 

1269 


r* rti ft, r* 

0000 


CHAR, 


0 




/DEFAULT CASE 


1 7 4 1 

lo4d 


1266 


5600 




JMP I KEYBRD 






1 o 4 o 


•1 n i *7 

12 67 


0500 


KP 1 


P 






lOtl 




(7! C\ 1 / 

la 9 1 4 


KF 1 


F 






1345 


19 71 
id / 1- 


H477 


K0# 


0 






X O 1 u 


1 y 7 y 
x c 1 c 


(71 K 5 A 

Id) 9d 0 


KS, 


S 






1 X 47 
101/ 


1 97 x 
it / 0 


01 K t; 7 

Id) 9 00 


KWi 


W 






1 X 5I7I 
X o y id) 












/CTRLH KEY 


x o y x 


1 y 7 4 


1 1 M7 

IXldJO 


CTRLH, 


TAD MODE 




/=0 FOR PAUSE 


1 359 
x o j c 












/=7777 FOR AND 


1 X5X 
X o y o 


1 y 7 r> 
1 d 1 y 


7 A K I7I 
/ O 9 lo 




SNA CLA 




/PAUSE MODE ? 


1 354 
X o 1 


19 7A 

id / 0 


5 A (71(71 

y 0 id) id) 




JMP I KEYBRD 




/YES IGNORE 


1 355 

X v v 












/CTRLH 


135ft 
x w > y 


19 7 7 
xc 1 1 


X1 I7i7 
O X Id* 0 




DCA MODE 




/SET MODE TO 


139 7 












/PAUSE 


1360 


1300 


6134 




CLEN 




/DISABLE ALL 


1361 












/CLOCK 


1362 












/INTERRUPTS 



13 6*5 


1301 


3066 




OCA SELDV0 




136 4 


1302 


3067 




DCA SELDV1 


/DESELECT 


136 5 


130 3 


3070 




OCA SELDV2 


/ALL DEVICES 


13 66 ' 


1304 


3071 




DCA SELDV3 




1367 


1305 


3072 




DCA SELDV4 




1370 


1306 


1363 




TAD HLTALL 


/PUT MESS 


1371 


1307 


4 50 5 




J MS I KQUPUT 


/in mt 


1372 


1310 


5600 




J MP I KEYBRD 




1373 










/H AND G SET A 


1 3 74 










/SWITCH TO WAIT 


137 5 










/FOR A 2ND CHAR 


1376 


1311 


7040 


H, 


CM A 


/SET FOR 2ND 


1377 


1312 


3364 




DCA HSWIT 


/H AND G CANNOT 


1400 


1313 


3365 




DCA GSWIT 


/BOTH BE SET 


1401 ' 


1314 


5600 




JMP I KEYBRD 




1402 


1315 


7040 


G « 


CM A 


/SET FOR 2ND 


1403 


1316 


3365 




DCA GSWIT 




1404 


1317 


3364 




DC A HSWIT 




1405 


1320 


5600 




JMP I KEYBRD 




1406 


1321 


1265 


NUM, 


TAD CHAR 


/NUM KEY 


1407 


1322 


0367 




AND PP 17 


/STRIP ASCII 


1410 


1323 


3104 




DCA TEMP 




1411 


1324 


1104 




TAD TEMP 


/CHK FOR 


1412 


13 25 


1036 




TAD DEVNUM 


/UNDEFINED 


1413 


1326 


7 700 




SMA CLA 


/DEV NUM 


1414 


1327 


5600 




JMP I KEYBRD 


/ILLEGAL XI T 


1415 


13 30 


1364 




TAD HSWIT 


/ IS 2ND ARC 


1416 


1331 


7650 




SNA CLA 


/FOR H ? 


1417 


1332 


5335 




JMP ,+3 


/NO CHK G 


1420 


1333 


3364 




DCA HSWIT 


/YES CLR SWIT 


1421 


1334 


5766 




JMP I KHALT 


/GO TO HALT SR 


1422 


133 5 


1365 




TAD GSWIT 


/IS IT G ? 


1423 


1336 


7650 




SNA CLA 




1424 


1337 


5600 




JMP I KEYBRD 


/NO X I T 


1425 


1340 


3365 




DCA GSWIT 


/YES CLR SWIT 


1426 


1341 


5770 




JMP I KGO 


/GO TO GO SR 


1427 


1342 


1103 


C, 


TAD MODE 


/C KEY 


1430 


1343 


7640 




SZA CLA 


/PAUSE MODE ? 


1431 


1344 
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2502 


34 56 




DCA 


I BCDPTR 


/SAVE 


2636 


2503 


2056 




ISZ 


BCDPTR 




2637 


2504 


105 ; 0 




TAD 


TEMPLO 


/RESET TO 


2640 


2 505 


3 04 4 




DCA 


DBLLO 


/LAST VAL 


2641 


2506 


1051 




TAD 


TEMPHI 




2642 


2507 


3 045 




DCA 


DBLHI 




2 64 3 


2 510 


2052 




ISZ 


CNTR 


/DONE BOTH 7 


26 4 4 


2511 


5261 




JMP 


DBLLOP 


/NO 


2645 


2512 


1044 




TAD 


DBLLO 


/UNITS 


2 64 6 


2513 


3 456 




DCA 


I BCDPTR 




2647 


2514 


614*1 




LINC 





2650 








2651 


0515 


0077 




2652 


0516 


1533 




2653 


0517 


0002 




2654 








2655 


2520 


1330 




2656 


2521 


3052 




2657 


2522 


3053 




2660 








2661 


2523 


5724 




2662 


2524 


2600 




2663 


2525 


6443 


KLIMi 


2664 


2526 


6435 


KBCD , 


2665 


2527 


6417 


KR AD i 


2666 


2530 


7773 


NEG9, 


2667 








2670 








2671 








2672 








267 3 








2674 








2675 








2676 








2677 








2700 


2600 


7300 


BCDLOP 


2701 


2601 


1053 




2702 


2602 


1455 




2703 


2603 


1456 




2704 


2604 


3050 




2705 


2605 


1050 




2706 


2606 


1353 




2707 


2607 


7500 




2710 


2610 


3050 




2711 








2712 


2611 


7204 




2713 


2 612 


3053 




2714 








2715 


2613 


7040 




2716 


2614 


1056 




2717 


2615 


3056 




2720 


2616 


2055 




2721 


2617 


1050 




2 722 


2620 


1354 




2723 


2621 


6141 




2724 








2 72 5 


0622 


1357 




2726 


0623 


1020 




2727 


0624 


3777 




2730 


0625 


2017 




2 731 


0 62 6 


4017 




2732 


0627 


0002 




2733 








2734 


2630 


2052 




2735 


2631 


5200 




2736 


2632 


1456 




2737 


2633 


1053 




2740 


2634 


1354 




2741 


26 35 


6141 




2742 








2743 


0636 


1357 




2744 


0637 


0077 




2745 


0640 


1535 




2746 


0641 


0002 





LMODE 




SET I XCORD 


/SET PTR TO 


DCQDEX+4 


/X-Y TABLE 


PDP 




PMODE 




TAD NEC5 


/SET FOR 5 


OCA CNTR 


/BCD ADDS 


DCA BCNTR 


/HOLDS BCD 




/CARRYS 


JMP I ,n 




BCDLOP 


/CONT NXT PAGE 


LIMVL0 




BCDVAL 




RADVAL 
-5 






/ADD ABSOLUTE 




/DECIMAL VIA 




/LIMPTR TO 




/DECIMAL XCOORD 




/VIA BCDPTR AND 




/STORE FINAL 




/RESULT IN 




/X-Y TABLE 


*SCPF"LD + 600 




CLA CLL 




TAD BCNTR 


/CARRY a 0 « 1 


TAD I LIMPTR 


/0s»ll 


TAD I BCDPTR 


/0-11 


DCA TEMPLO 


/0 = 23 


TAD TEMPLO 


/CMK CARRY 


TAD Ml 2 




SMA 


/CARRY ? 


DCA TEMPLO 


/YES CORRECT 




/ANSER IS IN AC 


RAL CLA 


/L»l ON CARRY 


DCA BCNTR 


/SET CARRY FOR 




/NEXT BCD ADD 


CMA 


/RESET PTRS 


TAD BCDPTR 




DCA BCDPTR 




IS2 LIMPTR 




TAD TEMPLO 


/ANSWER+60 


TAD P60 


/■DIAL CODE 


L INC 




LMODE 


/STORE IN 


STH XCORD 


/X»Y TABLE 


LDA I 


/BU XCORD 


«HB I T 




ADD XCORD 




STC XCORD 




PDP 




PMODE 




ISZ CNTR 


/DONE ? 


JMP BCDLOP 


/NO 


TAD I BCDPTR 


/YES GET 100K 


TAD BCNTR 


/D IG I T + CARRY 


TAD P60 




LINC 




LMODE 




STH XCORD 




SET I XCORD 


/NOW SET FOR 


DCODEY+1 


/Y VALUE 


PDP 





2747 PMODE 



275 0 


2642 


7344 




CLL 


STA RAL 


/DO 100S, 10S 


2751 


2 643 


3052 




DCA 


CNTR 


/Y BCD CVERT 


2 752 


2644 


1355 




TAD 


PP400 


/MAKE Y ♦ 


2 75 3 


2645 


1035 




TAO 


YCUR 




2754 


2646 


303 5 




OCA 


YCUR 




2755 












/Y IS 0-777 


2756 


2647 


1457 


YLQP, 


TAD 


I RADPTR 


/•100, -10 


27 57 


2650 


3046 




OCA 


ARGLO 




2760 


2651 


3053 




DCA 


BCNTR 




27 61 


265 2 


2057 




ISH 


RADPTR 




2762 


2653 


103S 




TAD 


YCUR 




2763 


2654 


104.6 




TAD 


ARC LO 


/l DEFLATE 


2764 


2655 


2053 




■I Si 


BCNTR 


/BCD VALUE 


2765 


2656 


7500 




sma 




/DONE ? 


2766 


2657 


5254 




JMP 


ts3 


/NO 


2767 


2660 


1457 




TAD 


I RADPTR 


/■♦100» *10 


2770 


2661 


30 35 




DCA 


YCUR 


/RESET VALUE 


2771 


2662 


2057 




ISZ 


RADPTR 




2772 


2 66 3 


1053 




TAD 


BCNTR 


/OFF BY 1 


2773 


2664 


1357 




TAD 


P57 


/60-1 


2774 


26 65 


6141 




LINC 




2775 




1377 




LMODE 


/DIAL CODE 


2776 


0666 




STH 


I XCORD 


/TO X-Y TABLE 


2777 


0667 


0002 




POP 






3000 








PMODE 




3001 


2670. 


7 200 




CLA 






3002 


2671 


2052 




ISZ 


CNTR 


/DONE ? 


3003 


2672 


5247 




JMP 


YLOP 


/NO 


3004 


2673 


1035 




TAD 


YCUR 


/UNITS 


3005 


2674 


13 54 




TAD 


P60 




3006 


2675 


6141 




LINC 


/STORE 


3007 








LMODE 


/THE TABLE 


3010 


0676 


1377 




STH 


I XCORD 


/IS FINALLY 


3011 


06 77 


6 122 




JMP 


DSCXY 


/READY 


3012 












/HERE TO 


3013 








PMODE 


/DIS CURSOR 


3014 


2 700 


3035 


CUROIS, 


DCA 


YCUR 


/Y COORD 


3015 


27 01 


6214 




RDF 






3016 


2 702 


7110 




CLL 


RAR 




3017 


2703 


7012 




RTR 






3020 


2704 


3 04 7 




DCA 


XCURHI 


/X COORD HI 


3021 


2 70 5 


1054 




TAD 


BUFPTR 




3022 


2706 


3046 




DCA 


XCURLO 


/X COORD LO 


3023 


2707 


7001 




I AC 






3024 


2 710 


3051 




OCA 


TEMPHI 


/DELTA V 


3025 


2711 


1351 




TAD 


CURL EN 


/CURSOR IS VERT 


3026 


2712 


3052 




DCA 


CNTR 


/LN OF LENGTH 


3027 












/«C(CURLEN) 


3030 


2 713 


1352 




TAD 


MAXCUR 


/IF Y COORD 


3031 


2 714 


1035 




TAD 


YCUR 


/TOO HI CURSOR 


3032 


2715 


7750 




SPA 


SNA CLA 


/IS DIS BELOW 


3033 












/SPECTRUM 


3034 


2716 


5321 




JMP 


CUR LOP -1 




3035 


2717 


7040 




CM A 




/TOO HI SET 


3036 


27 20 


3051 




DCA 


TEMPHI 


/DELTA V TO -1 


3037 


2721 


1035 




TAD 


YCUR 




3040 


2722 


1051 


CUR LOP, 


TAD 


TEMPHI 




3041 


2723 


6141 




LINC 




3,04 2 








LMODE 




3043 


0724 


0157 




D IS 


XCORD 




3044 


0725 


0002 




POP 






30 4 5 








PMODE 





3046 


2726 


2052 




ISZ CNTR 




3047 


2727 


5322 




JMP CURLOP 




3050 


2730 


5731 




JMP I .+1 




3051 


2731 


2275 




CURRTN 




3052 








LMODE 




30 53 


0732 


02 41 


DSCCHR • 

WW WW T II A I 


ROL 1 

n w Lv x 


/Mill T RY 9 

f > ' U la 1 Bl 


3054 


0733 


1120 




ADA I 

WWW J 


/ AnDR IS RFI 


3055 


0734 


7330 






/TD CRnTAR 


3056 


0735 


4014 




STC GRDPTR 




3057 


0736 


1120 




ADA I 




3060 


0737 


0000 


VCOORD, 


0 




3061 


0740 


1774 




DSC I GRnPTR 

www i unur in 




3062 


0741 


1774 




DSC I GRnPTR 
www i wiAur i r\ 




3063 


0742 


1020 


ret 


LDA I 


/MAKE HORIE 


3064 


0743 


0002 


2 


/r.AD OCT pUADC 


3065 


0744 


0452 




L2F . 
wet 


/? rnR wait 


3066 


0745 


2743 




ADD P2 


/4 rnR rui i 

/ n run ruL.u 


3067 


0746 


1140 




ADM 

null 


3070 


0747 


0001 




1 




3071 


0750 


6000 




JMP 0 




3072 








PMODE 




3073 


2751 


7750 


CURLEN# 


KURLEN 


/3-l FNGTH OF 


3074 










/CURSOR 


3075 


2752 


7431 


MAXCUR • 


• 37 7s*KURl TNI 


/may y rnnpn 


3076 










/rnR piircdr 


3077 












3100 


2753 


7766 


Ml 5 i 


it 




3101 


2754 


0060 


P60 » 


60 




3102 


2755 


0400 


PP400 , 


400 




3103 


2756 


7774 


MM4 i 


■ 4 




3104 


2757 


0057 


P57, 


57 




3105 








PAGE 




3106 


3000 


0000 


MUL10I 


0 


/RAfal 0 + AC 


3107 


3001 


3050 




DCA TEMPLO 

WW^ I W 1 II WW 


/TO D AC 


3110 


3002 


4217 




JMS DSCL 

Vllw U W W lm 


/ n A P # ? 


3111 


3003 


1044 




TAD DBLLO 

■ rMJ W W k* l» w 




3112 


3004 


3046 




DCA ARGl D 


/ s a wr 


3113 


3005 


1045 




TAD DBLHI 




3114 


3006 


3047 




DCA ARGHI 

W W O n 1 1 w 11 A 




3115 


3007 


4217 




JMS DSCL 

yi iw w w w W 


/Yin ds 


3116 


3010 


4217 




JMS DSCL 

W 1 1 w w w w |« 


/ D A C ttfl 


3117 


3011 


4437 




JMS I KDADD 


/+nAP«2cnAC#i ci 


3120 


3012 


3047 




DCA ARGHT 


/NDUI ADD NFW 


3121 


3013 


1050 




TAD T EMPl 0 


/ VAI 


3122 


3014 


3046 




DCA ARGLO 




3123 


3015 


4437 




JMS I KOADD 


/snAC*1 0+ AC 


3124 


3016 


5600 




JMP T MU I 1 0 




3125 


3017 


0000 


dscl i 

w w v L» * 




/rai nAP »nAP*o 


3126 


3020 


7300 




CLA CI L 




3127 


3021 


1044 




TAD DRt t f> 




3130 


3022 


700 4 




RAL 




3131 


3023 


3044 




DCA DBLLO 




3132 


3024 


1045 




TAD DBLH I 




3133 


3025 


7004 




RAL 




3134 


3026 


3045 




DCA DBl H I 

wwn u w u n i 




3135 


3027 


5617 




JMP I DSCI 

W 1 1' A W W W \m 




3136 


3030 


0000 


DC I A # 


0 


/2S POMP DF nAP 


3137 


3031 


7200 




CLA 




3140 


3032 


1045 




TAD DBLHI 




3141 


3033 


7040 




CM A 




3142 


3034 


3045 




DCA DBLHI 




3143 


3035 


1044 




TAD DBLLO 




3144 


3036 


7041 




CIA 





3145 


3037 


7450 


3146 


3040 


204 5 


3147 


30 41 


3044 


3150 • 


304 2 


5630 


3151 


3043 


0000 


3152 


3044 


3050 


3153 


3045 


4217 


3154 


3 04 6 


4217 


3155 


3047 


4217 


3156 


3050 


4217 


315 7 


3051 


104 4 


3160 


3052 


1050 


3161 


3053 


3044 


3162 


3054 


5643 


3163 


3055 


0000 


3164 


3056 


7346 


3165 


3057 


3050 


3166 


3060 


5264 


3167 






3170 


3061 


7012 


3171 


3062 


7012 


3172 


3063 


3044 


3173 


3064 


1044 


3174 


3065 


0306 


3175 


3066 


3410 


3176 


3067 


1044 


3177 


3070 


2050 


3200 


3 071 


5261 


3201 


3072 


7200 


3202 


3073 


10 45 


3203 


3074 


0306 


3204 


3075 


3410 


3205 


30 7 6 


1045 


3206 


307 7 


7012 


3207 


3100 


7012 


3210 


3101 


0306 


3211 


3102 


3410 


3212 


3103 


304 4 


3213 


3104 


3045 


3214 


3105 


5655 


3215 


3106 


0017 


3216 


3107 


0000 


3217 


3110 


1330 


3220 


3111 


3004 


3221 


3112 


1036 


3222 


3113 


3052 


3223 


3114 


1404 


3224 


3115 


7510 


3225 


3116 


5323 


3226 


3117 


3104 


3227 


3120 


4501 


3230 


3121 


7040 


3231 


3122 


3404 


3232 


3123 


7200 


3 23 3 


3124 


2004 


3234 


3125 


2052 


3235 


3126 


5314 


3236 


3127 


5707 


323 7 


3130 


0073 


3240 






3241 






3 24 2 






3243 







SNA 
ISZ 
DCA 
J MP 



0SCL4, 0 



UPACK, 



PCKLOP 



P17, 
CHKSWI , 



CHKLOP 



BYHLT, 



HSWPTR, 



DCA 
JMS 
JMS 
JMS 
JMS 
TAD 
TAD 
DCA 
JMP 
& 

ST A 
DCA 
JMP 



DBLHI 
DBLLO 
I DC I A 

TEMPLO 

DSCL 

DSCL 

DSCL 

DSCL 

DBLLO 

TEMPLO 

DBLLO 

I DSCL4 

CLL RTL 

TEMPLO 

.♦4 



RTR 
RTR 

DCA DBLLO 
TAD DBLLO 
AND PI 7 
DCA I INIPTR 
TAD DBLLO 
IS2 TEMPLO 
JMP PCKLOP 
CLA 

TAD DBLHI 
AMD P17 
DCA I INIPTR 
TAD DBLHI 

RTR 
RTR 

AND PI 7 

DCA I INIPTR 

DCA DBLLO 

D$A DBLHI 

JMP I UPACK 

17 

0 

TAD HSWPTR 
DCA BETA2 
TAD DEVNUM 
DCA CNTR 
T#D I BETA2 
SPA 

JMP BYHLT 
DCA TEMP 
JMS I KHLTMS 
CMA 

DCA I BETA2 

cU 

I$2 BETA2 
IS2 CNTR 
JMP CHKLOP 
JMP I CHKSWI 
HSWIT0 
PAGE 



/PACK BCD IN 
/DAC *ROL 4 +AC 
/MOVE 4 LEFT 



/UNPACK DAC 

/PUT IN IN I TAB 

/5 VALS 3 IN 

/DBLLO 

/2 IN DBLHI 

/NXT VAL 

/TO LOW 4 BITS 

/UPDATE 



/I VAL TO TABLE 

/DONE ? 
/NO 

/LAST VALS 



/CLR DAC 



/SEE IF TISA 
/HAS HALTED 
/ANY DEVS 
/«NUM DEFINED 



/TISA HALT ? 
/NO 

/HLT MESS 
/TO QUE 
/CLR SWIT 



/FRESH START 
/CLR BUFFER 
/INIT ALL ARCS 



3244 


3200 


0000 


FRSTR, 


0 






3245 


3201 


7200 




CLA 




/PUT 0S FROM 


7 n A c 
u C T u 


O C V c 


n ni < 
i»Ot 




TAD 


M INADR 


/MINCDF » M INADR 


3247 


3203 


3046 




DCA 


ARGLO 


/TO MAXCDF, 7777 


3250 


3204 


1033 




TAD 


MINCDF 




3251 


3205 


3060 




DCA 


CURCDF 




3252 


3206 


4672 


CLRLOP, 


JMS 


I KSET 


/SET CDF 


3253 


3207 


3446 




DCA 


I ARGLO 


/A 0 TO BUFER 


3254 


3210 


2046 




ISZ 


ARGLO 


/DONE FIELD ? 


3255 


3211 


5207 




JMP 


• •2 


/NO 


3256 


3212 


2060 




ISZ 


CURCDF 


/ADV FLD 


3257 


3213 


1060 




TAD 


CURCDF 




3260 


3214 


7041 




CIA 






3261 


3215 


1032 




TAD 


MAXCDF 




3262 


3216 


7700 




SMA 


CLA 


/FINI ? 


3263 


3217 


5206 




JMP 


CLRLOP 


/NO 


3264 


3220 


6201 




CDF 


0 


/RESET FLD 


3265 


3221 


3053 




DCA 


BCNTR 


/DEV COUNT 


3266 


3222 


1034 




TAD 


MINADR 


/1ST AVAIL 


3267 


3223 


3274 




DCA 


LSSALO 


/BUF ADDR 


3270 


3224 


1033 




TAD 


MINCDF 




3271 


3225 


3275 




DCA 


LSSAHI 


/=SA DV 0 


3272 


3226 


1106 




TAD 


KINI 




3273 


3227 


3276 




DCA 


LSINI 




3274 


3230 


1277 




TAD 


KENC 


/SA ENC TABLE 


3275 


3231 


3300 




DCA 


LSENC 




3276 


3232 


5600 




JMP 


I FRSTR 




3277 












/INIT ARGS FOR 


3300 












/CURRENT DEVICE 


3301 


3233 


0000 


RESTR, 


0 






3302 


3234 


7200 




CLA 






3303 


3235 


1053 




TAD 


BCNTR 


/=NUM OF 


3304 












/DEFINED DVS 


3305 


3236 


3052 




DCA 


CNTR 




3306 


3237 


1274 




TAD 


LSSALO 


/SA CURN DV 


3307 


3240 


3021 




DCA 


CURNLO 




3310 


3241 


1275 




TAD 


LSSAHI 




3311 


3242 


3020 




DCA 


CURNHI 




3312 


3243 


1276 




TAD 


LSINI 


/PTR TO INI TAB 


3313 


3244 


3010 




DCA 


INIPTR 


/CURN DV 


3314 


3245 


1300 




TAD 


LSENC 




3315 


3246 


3022 




DCA 


ENCPTR 




3316 


3247 


3044 




DCA 


DBLLO 




3317 


3250 


3045 




DCA 


DBLHI 




3320 


3251 


1301 




TAD 


P4060 


/CURN DV NUM 


3321 


3252 


1052 




TAD 


CNTR 


/TO QA TXT FLD 


3322 


3253 


3702 




DCA 


I KTXT26 


3323 


3254 


5633 




JMP 


I RESTR 




3324 












/INIT ARGS NXT 


3325 












/DV REVERSE OF 


3326 












/RESTR 


3327 


3255 


0000 


NXSTR » 


0 






3330 


3256 


.7200 




CLA 






3331 


3257 


1052 




TAD 


CNTR 




3332 


3260 


3053 




DCA 


BCNTR 




3333 


3261 


1021 




TAD 


CURNLO 




3334 


3262 


3274 




DCA 


LSSALO 




3335 


3263 


1020 




TAD 


CURNHI 




3336 


3264 


3275 




DCA 


LSSAHI 




3337 


3265 


1010 




TAD 


INIPTR 




3340 


3266 


3276 




DCA 


LSINI 




3341 


3267 


1022 




TAD 


ENCPTR 




3342 


3270 


3300 




DCA 


LSENC 





3*54,3 


3271 


5655 




JMP 


I NXSTR 




3344 


3272 


2320 


KSET, 


SET CDF 




3345 


3273 


7757 


INILEN, 


INISTR-INIEND-1 




3346 


3274 


0000 


LSSALO, 


0 






3347 


3275 


0000 


LSSAHI , 


0 






3350 


3276 


0000 


LSINI, 


0 






3351 


3277 


3306 


KENC i 


ENCVAL 




3352 


3300 


0000 


LSENC, 


0 






3353 


3301 


4060 


P4060, 


4060 






3354 


3302 


4573 


KTXf 26, 


TXT2+6 




3355 


3303 


6144 


K ADR » 


INUD-1 




3356 


3304 


7776 


CLKCNT, 


-2 






3357 


3305 


4100 


CLKMOD > 


4100 




3360 


3306 


0040 


ENCVAL t 


0040 


/ENABLE CHAN 1 


3361 


3307 


0010 




0010 


/« »♦ 2 


3362 


3310 


0002 




0002 


/" " 3 


3363 


3311 


0000 




0 




/MUST HAVE 0 


3364 












/HERE 


3365 


3312 


7200 


QADUN > 


CUA 




/DONE SETUP 


3366 


3313 
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' UN I T " 


4 355 


0 34 7 

10 w"T r 


602 1 

w W ft X 




IMP rUVCMC 
Jnr UHKolNa 




4356 


01350 

V v ✓ v 


007 4 








4357 


0351 

IP W X 


0 59 4 

10 ^ft ~ 




A IN 3 n L n 




4360 


0352 


0002 

10 10 to ft 




□ no 

r Ur 




4361 








PMfinr 

rnuut 




4362 


4353 


5754 




IMP T *1 




4 363 


4354 


1664 








4364 








Dire 




4365 


4400 


6002 


WRIT, 


I OF 


/IGNORE KBRD 


4 >50 O 










/DURING WRITE 


4367 


4 401 


1207 




TAD I KBLKCT 


/-NUM TO DO 


4370 


4402 


7041 




CIA 




4371 


4403 


6141 




UINC 





4o i d. 








LMQDE 




437 3 


0 404 


4 3 32 




STC FREE 




4 374 


0 405 


0074 




SET I ANSPTR 


/PUT TBLK 


4 37 5 


0406 


072 3 




TXT6+3 


/NUM (3 DIGITS) 


4376 


0 407 


2332 




ADD FREE 


/IN QANDA TEXT 


437 7 


0410 


0 306 




RfR 6 


/AT TXT6*-3» 


4 4 00 


0411 


1560 




B$L I 


/TXT6*4, 


4 40 1 


0 412 


7770 




7770 


/AND TXT6*5 


4 40 2 


0413 


2513 




AiD PL60 




4403 


0414 


1374 




S$H I ANSPTR 




4404 


0415 


1000 




LfeA 




4405 


0416 


0332 








4406 


0 417 


0303 




R0 ! R 3 




4407 


0420 


15 60 




B t L 1 




4410 


0421 


7 7 70 




7*70 




4411 


0422 


2513 




AID PL 60 




4412 


04 23 


1374 




STH I ANSPTR 




4413 


0424 


1000 




LfA 




4414 


0425 


0332 




F#EE 




4415 


0426 


1560 




BEL I 




4416 


0427 


7 7 70 




7770 




4417 


0 4 30 


2513 




A to PL 60 




4420 


0431 


1374 




SfH I ANSPTR 




4421 


0432 


064 3 




L0F 3 


/EXP 


4422 


04 3 3 


7013 




J MP QA IN IT 




4423 


0434 


0672 




T XT 4 




4 424 


0435 


2005 




AN S S4*2000 




4425 


04 36 


7066 




JMP QARFSH 




4426 


0 4 37 


1020 




LQA I 


/PATCH SPACE 


442 7 


ft A A I A 

0440 


0040 




40 


/AROUND NAME 


44 3 0 


04 4 1 


1340 




STH 


/FOR MAGSPY 


4 431 


0 44 2 


2 005 




A|lS4*2000 
J^IP QAlNlT 




4432 


0 44 3 


7013 




/DSC 


4433 


044 4 


0 720 




TXT6 


/WRITE <*** 


4434 


0 44 5 


0524 




ANSWER 


/TBLKS 


4 435 


0 44 6 


/066 




QARFSH 


/1ST Tifc^ 


4436 


0447 


0074 




SET I ANSPTR 


/UNIT - 


4437 


0 45 0 


0524 




ANSWER 




44 40 


0451 


a rt< f« o 

0002 




PDP 




4441 








PMODE 




44 42 


4452 


C i, D Ti 

56 S3 




JMP I 




A A A *l 

4 <*4 3 


A A K ~l 

4 453 


1746 




DOWRC 




4 44 4 








LMODE 




4 44 5 


0 454 


7013 


LOAD* 


JMP QAINIT 


/DSC 


4446 


0455 


0747 




TXT7 


/LOAD ••«**•»•* 


4447 


0456 


0524 




ANSWER 


/UNIT * 


4450 


0457 


7066 




JMP QARFSH 


4451 


0460 


1300 




LDH 




4 452 


0 461 


4 52 4 




ANSWER+HBI T 




vi A l: 'I 

4 45 3 


0 46 2 


0470 




AHE I 




4 45 4 


0 46 3 


6 45 4 




JMP LOAD 




4 45 5 


0464 


0600 




L IF 0 




4456 


0465 


7525 




JMP KLOAD 




4 45 7 


0 46 6 


0000 


D IGCHK, 


0 


/CHK NUMERIC 


4460 


n A L. "7 

046 / 


6141 




6141 


/INPUT 


4 461 


04/0 


1334 


DLQ0P# 


LDH I ANSPTR 


/FROM OA FID 


44 62 


04 71 


1420 




SHD V 


4463 


0 47 2 


7 400 




QAE0L1 




A A A A 


n a *7 'i 
0 4/3 


6517 




JMP EGLXJT-QAFLD 


4465 


0474 


0470 




AZE I 


/BLANK INPUt ? 


4466 


0475 


6470 




JMP DLOOP 


/YES IGNORE 


4467 


0476 


1420 




SHD I 


4470 


0477 


3 400 




QAE0M1 





4471 


0500 


6517 




JMP EOLXIT-QAFUD 


4472 


0501 


1120 




ADA I 


4473 


0502 


7720 




-57 


4474 


0503 


0451 




APO /DIGIT ? 


4475 


0504 


6522 




JMP ERRXIT-QAFLD/NO ILLEGAL 


4476 








/INPUT 


44 77 


0505 


1120 




ADA I 


4500 


0506 


7765 


UPLIM, 


•12 /»10 OR «12 


4501 


0507 


0471 




APO I /DIGIT ? 


4502 


0510 


6522 




JMP ERRXIT-QAFLD 


4503 


0511 


1314 




LOH ANSPTR 


4504 


0512 


1560 




BCL I /PUT DIGIT 


4505 


0513 


0060 


PL60, 


60 /IN AC 


4506 


0514 


0002 




POP 


4507 








PMODE 


4510 


4515 


2266 




ISZ DIGCHK /P + 3 IS NORMAL 


4511 


4516 


7410 




SKP 


4512 


4517 


0002 


EOLXJT* 


2 /POP 


4513 


4520 


2266 




IS2 DIGCHK /P*2 IS EOL 


4514 


4521 


7410 




SKP 


4515 


452* 


0002 


ERRXIT, 


2 /P+l IS ERR 


4516 


4523 


5666 




JMP I DIGCHK /RTN 


4517 








LMODE 


4520 


0524 


tf000 


ANSWER, 


0 


4521 


0525 


0000 




0 


4522 


0526 


0000 




0 


4523 


0527 


0000 




0 


4524 


0530 


0000 




0 


4525 


0531 


0000 




0 


4526 


0532 


0000 




0 


4527 


0533 


0000 




0 


4530 


0534 


0000 




0 


4531 


0535 


0620 






4531 


0536 


0122 






4531 


05 3 7 


0115 






4531 


0540 


0524 






4531 


0541 


0522 






4531 


0542 


4011 






4531 


0543 


1620 






4531 






TXTli 


TEXT ?FPARAMETER INPUT 


4532 


05 44 


2524 






4532 


054!5 


4306 






4532 


0546 


0417 






45v52 






F00<1 




4533 


0547 


7461 






4533 


0550 


4306 






4533 


1^551 


6140 






4 5 0 0 


3552 


1411 






4533 


0553 


1603 






4 533 


05^4 


4024 






4533 


0555 


0120 






4533 






Fl LI NC 


TAPE 


453* 


0556 


0543 






453<i 


055/' 


0662 






453<t 


05O& 


4013 






4 534 


0561 . 


0531 






4>34 


0562 


0217 






450»4 


0560 


0122 






4534 


0564 


0434 






4544 






F2 KEYBOARDS? 


4 5 0 5 


t/5w.5 


06ii 






4 535 


0->66 


16*3 






4535 


056/ 


2422 







45-35 0570 2515 

4 50 5 0571 W4iO 

45-0.5 0/57* 244tf 

•453-5 573 3k»3i 

453-5 0574 4011 

45B3-5 k5>7& &374 

TXT2, TEXT ?FI N5T-RUMENT XY I S<1 

6 0576 644.3 
4536 

4 537 16? 77 4043 

453 7 0600 4040 
4 53 7 (2601 4#40 
4 557 ^60ii 5061 
4567 0603 7iPk3l 
4557 2604 1604 
4 56 7 2 605 1417 
4507 2606 &7v4 
4 50/ 2607 406* 
4507 0610 7505 
4 167 0611 1603 
4557 2612 1704 
4^57 0613 0504 

45 07 <1«ANAL0C, 2«£NC0O£D> 

4540 0614 5143 

45'40 2615 0623 

45<+0 0616 2401 

4^10 ^617 2.224 

454 0 0620 1116 
4540 0621 074y 

4540 06.22 2017 
454^ o 6 <; 3 1116 
454* ifr624 2475 

454* FSTARTING P0|NT«<5 

4 541 tf625 7 4-65 

4541 1^6*0 4306 
4541 *6*7 *417 
4541 0630 *4tfl 
4541 0631 1440 
4541 0632 2017 
4541 0 633 1116 
4541 0634 2423 
4541 0635 7574 

4541 FTOTAL P0INTSX5 

4542 0636 6543 
4542 0637 0623 
4542 0640 0115 
4542 0641 2014 
4542 0642 1116 
4542 2643 0740 
4542 0644 0622 
4542 2645 0521 
4542 2646 7574 
4542 0647 6234 

4542 FSAMPLINC FREQ»<2\? 

4540 265k, 0604 

4540 2651 1774 

454o TXT3, TEXT ?FD0<1 

4544 065* 6143 

4544 2653 0661 

454s 0654 4015 

4544 2655 17*2 

4544 2656 0540 

4544 26 57- 1116 



45 4*t 




^3^4 


4544 


16 6 6 1 


> > V '-i 
*■ 6w fc «✓ 


4544 


^662 


1501? 


4544 


0663 


1624 


4544 








0664 


2343 


4545 


066b 


06 62 


4545 


0666 


4023 


4545 


0667 


2401 


1545 


0670 


2224 


4545 


0671 


3400 


4545 






4546 


0672 


0605 


4546 


0673 


3020 


4546 


0674 


0522 


4546 


0675 


1115 


4546 


067 6 


0516 


4546 


0677 


2440 


4546 


0700 


1601 

*it ^ U JL 


4546 






4547 


0701 


1505 


4547 


0702 


4306 


4547 


0703 


7470 


4547 


0704 


3400 


4547 






4550 


0705 


062? 


4550 


0706 


0501 


4550 


0707 


0440 


4550 


0710 


2402 


4550 


0711 


1413 


4550 






4551 


0712 


7463 


4551 


0713 


4306 


4551 


0714 


2516 


4551 


0715 


1124 


4551 


0716 


7461 


4551 


0717 


3400 


4551 






4552 


0720 


0627 


4552 


0721 


2211 


4552 


07 22 


24 05 


4552 


0723 


4030 


4552 


0724 


3132 


4552 


0725 


4050 


4552 


0726 


1703 


4552 


072 7 


2451 


4552 


0730 


4024 


4552 


0731 


0214 


4552 






4553 


0732 


1323 


4553 


0733 


4306 


4553 


0734 


0611 


4553 


0735 


2223 


4553 


0736 


2440 


4553 


0737 


2402 


4553 


074 0 


1413 


4553 


0741 


7574 


4553 






4554 


07 42 


6343 


4554 


0743 


0625 


4554 


0744 


1611 


4554 


0745 


2474 


4554 


0746 


6134 



Fi MORE INSTRUMENTS 



F2 START\? 



TXT4, TEXT 7FEXPER I MENT NAME 



F<8\? 



TXT5, TEXT ? FREAD TBIK<3 



FUNIT<1\? 



TXT6, TEXT ? FWR I TE XY2 (OCT) TBLKS 



FFJRST TBLK*<3 



45 54 






4 5'5 5 


074 7 


0614 


4555 


0750 


1701 


4 555 


0 751 


0 4 74 


4555 






4 556 


0752 


7043 


45 56 


0753 


0625 


4556 


0 754 


1611 


4556 


0755 


2474 


4 55 6 


0 756 


6134 


4 556 






4557 


0757 


0605 


4557 


0 7 60 


2222 


4557 


0761 


4060 


4 55 7 


0762 


402-0 


455 7 


0763 


2423 


4557 


0764 


3 4 00 


4557 






456 0 


0765 


0605 


4560 


0766 


2222 


4 5 60 


0767 


4002 


4560 


07 70 


2506 


4560 


07 71 


4006 


45 60 


07 72 


2514 


4560 


07 73 


1434 


4560 






4561 


0774 


0605 


4561 


0775 


2222 


4561 


0 7 76 


4006 


4561 


07 7 7 


2205 


4561 


1000 


2134 


4561 






4562 


1001 


0605 


4562 


1002 


2222 


4562 


1003 


4011 


4562 


10-04 


1623 


4562 


1005 


2434 


4562 






4563 


1006 


0605 


4563 


1007 


2222 


4563 


1010 


4005 


4563 


1011 


1603 


4563 


1012 


3400 


4563 






4564 






5530 


1701 


0000 


5531 






5532 






5533 


0001 


4 04 0 


5534 


0002 


4040 


5535 


0003 


4040 


5536 


0004 


4040 


5537 


0005 


0000 


5540 


0006 


0000 


5541 


0007 


0000 


5542 


0010 


0000 


5543 


0011 


0000 


5544 


0012 


4040 


5545 


0013 


4040 


5546 


0014 


40421 


5547 


0015 


4040 


5550 






5551 







FUNI T<1\? 



TXT7 # t€!X"T VFlM*? 



FUNIT<1\? 



TXT 10 , TEXT JftftlR 0 PTS\? 



TXT 11 » TEXT ?F£«R BUF FULL\? 



TXT 12 » TEXT tFtSfi FREQU 



TXT13 # TEXT tFlRR INSTXt 



TXT14, TEXT tFtMR ENCS? 



AAAS2 



ANS4, 



NOLI St 




0 

SEGMNT 1 




»1 




4040 


/•net w 


4040 


/AROUND NAME 


4040 


/FOR MAdSPf 


4040 
0 


/SXPIRfMtN! 


0 


/NAME 


0 




0 
0 




4040 




4040 




4040 




4040 




PMODE 





/INITIALISATION TABLE FILLED BY 



5552 






/SETUP 


AND 


n LAU 


nUU 1 0 




5553 






/17 VALUES 


DTD 


nrt/ » rr 
UL V 1 L-t 


*t ut V I Ct a 


5554 


601 6 


0001 

toy C It) J. 


T M T C T D 


4 
1 






/ c a in 


5555 


6017 


0002 




c 






/ C A U T 

^ a A n i 


5556 


6020 


0003 




1 
0 








5557 


60 21 


00 04 




•> 






/ _ e A U T 


5560 


6022 


0005 




c 
5 






/en rrT unon 


5561 


6023 


0006 

V W V V 




0 






/a t/UUnU lo 


5562 


6024 


0007 




/ 






/ 1 1) a 


5563 


6025 


0010 

w u A If 




Q 

o 






/ 1 0 0IC. 
/ X rO v a 


5564 


6026 


001 1 

w w x X 




9 






/ 1 0 00le 
f lit) loltJo 


5565 


6027 


0 010 
>" io x lo 




10 






/ 1 01 01 01 01 Q 

/ x v \o vi w a 


5566 


60 30 


0011 
Ifw XX 




1 1 
11 






/-aA Lu NX i DV 


5567 


60 31 


0012 

•"Wit. 




1 o 
xc 






/_e* ut mvt nw 


5570 


6032 


0013 










/ m t C & |f) r A UTi 
'•Ufl Lw » t A Hi; 


5571 


6033 


0014 




14 








5572 


6034 


0015 

W IV x 




15 






/-SAM FREQ 


5573 


6035 

U \U w 


0 016 




16 








5574 


v K/ v w 


001 7 

to (0 X / 


INI END » 


1 7 






/.Cam PDr^ 

/•SAM rHLQ 


5 57 5 


6 03 7 


0 MC1 1 
K) kv KJ x 




1 






/DtVICt 1 


5576 


6040 


000? 
w to to c 




2 






5577 


6 0 41 


000 
10 10 It) 0 




3 








5600 


6 0 4? 

O It) *T £ 


0 0 0 4 

iw 10 |t) «t 




4 








5601 


6 0 4 3 

O It) *t w 


0 00 5 

It) SO K) 2 




5 








560? 


A I7I 4 4 


It) It) 10 0 




6 








5 60 3 

V U KJ O 


6 CI 4 5 


0 001 7 
If It) 10 / 




7 








5 60 4 


f\ 0 4 6 


0 0 1 in 
to to x if 




8 








5605 


60 47 


001 1 
to to x X 




y 








5606 


60 50 


00 1 0 
a\u xio 




10 








5607 


60 51 


0011 
to to X X 




1 1 

11 








5610 


60 5? 

V 161 ^ C 


001? 
"wit 




12 








5611 


6053 


0 01 3 

tU £> X O 




1 '< 
1 O 








5612 


60 54 


0014 

V w x ~ 




14 








5613 


605 5 


0015 

u 'J X <* 




1 5 








5614 


60 56 

U KJ -' V 


0 0 1 A 
10 10 x O 




16 








5615 


6 0 5 7 

w K) ✓ f 


001 7 
w to x / 




17 








5616 


6060 

U C w W 


0001 

WW) x 




1 








5617 


60 61 
u iy y x 


00 0? 
io it) it) c 




2 








5620 


6062 


000 3 

W 10 It) o 




3 








5621 


6 06 3 

U W v U 


0 00 4 
to to io *t 




4 








5622 


60 6 4 


00 05 

IO IO 10 3 




5 








5623 


6 06 5 

U 10 w V 


0 00 6 
io if It) o 




6 








5624 


6066 


0007 
w 10 10 / 




/ 








5625 


60 67 


0010 
It/ If x to 




8 








5626 


60 70 


0011 

to to X X 




9 








5627 


60 71 

u io / a 


20 1 0 
to to x I0 




10 








56 30 


60 7? 

V iO / C 


0011 




11 








5631 


6 0 7 3 

D It) / v 


001 ? 
WW XC 




12 








5632 


6074 


001 ^ 
10 to X 0 




13 








5633 


6 0 7 5 


0 014 
to 10 X *t 




14 








5634 


6076 


0015 




15 








5635 


6077 

U IO / ' 


001 6 
io to x O 




16 








5636 


61 00 " 


to If x / 




17 








5637 


6101 
O 1 161 X 


0 0 01 1 
It) If It) X 




1 






/DtVICE 3 


5640 


61 0? 
O X 10 c 


000I? 

10 10 It) c 




2 








5 641 


610 3 


to to IO O 




3 








5642 


610 4 

<J X %j ~ 


0 0 01 4 

It) tO It) *t 




4 








5643 


610 5 
o x if 


0 0 0 5 
io to it; 3 




5 








5644 


610 6 


CI M Ol A 
it) l&) It) O 




6 








5645 


6107 


0 00 7 




7 








5646 


6110 


0010 




6 








5647 


6111 


0011 




9 








5650 


6112 


0010 




10 









5451 6X13 0011 11 

5652 6114 0042 12 

5653 6115 0013 13 

5654 6116 0014 14 
56 55 6117 0015 15 

56 56 6120 ,01316 16 
5657 6121 0017 17 

5660 6122 0001 1 /0EVICE 4 

5661 61*3 0002 2 

5662 612 4 0003 3 

5663 6125 0004 4 

5664 6126 0005 5 

566 5 612 7 0006 6 

5666 6130 0007 7 

5667 6131 0010 8 

567 0 6132 0011 9 

5671 6133 0010 10 

5672 6134 0011 %% 

5673 6135 0012 12 
567 4 6136 0013 13 
5675 6137 0014 14 
5 67 6 6140 0015 15 
5677 6141 0016 16 

5700 6142 0017 17 

5701 6143 0000 BLKCNT, 0 
5 702 614 4 00.00 LAST # 0 

5703 /TABLE OF AOOR THAT TELL WHERE 

5704 / I N I T VALS GO 

5705 6145 6272 INI AO* TISTR0 /DEVICE 0 

5706 6146 6273 T j STR0#1 

5707 6147 6443 L I MVL0 

5710 6150 6444 L I M VI 0 ♦ % 

5711 6151 6274 TISTR0*2 

5712 6152 6471 BCD0 

5713 6153 6472 BCQ0*1 

5714 6154 6473 BCQ0+2 

5715 6155 64 74 8000*3 

5716 6156 6475 8000*4 

5717 6157 6447 LIMVLl 

5 720 6160 6450 LIMVL1*1 

5721 6161 0314 ELOOV0 

5722 6162 0315 EHJ DV0 

5723 6163 6275 TISTR0*3 

5724 6164 6276 TlSTR0*4 

5725 6165 6445 LJMVL0*2 

5726 6166 6277 TISTR1 /DEVICE 1 

5727 6167 6300 1iSTB%*$ 

5730 6170 6447 LJMVL1 

5731 6171 6450 LlMVLl*l 

5732 6172 6301 TISTR1*2 

5733 6173 6476 8CD1 

5734 6174 6477 BC01*1 

57 35 6175 6500 8001*2 

5736 6176 6501 8001*3 

5737 6177 6502 BGD1+4 
5740 6200 6453 L IMVL2 

5 741 6 201 6 454 LIMVL2*! 

5742 6202 0336 EL0DV1 

5743 6203 0337 LHIDV1 

5744 6204 6302 TJSTR1*3 

5745 6205 6303 TISTR|#4 

5746 6206 6451 LI^VLl*f 

5747 6207 6304 \\ STR2 /DEVICE 2 



5 7 5 01 
/ 3 10 


A 9 1 01 
04 10 


tine 

00 109 




ft CT O ^_ 4 

TI 5T RZ*1 




-'/PI 


A 9 1 1 
0C.11 


A 4 K TT 
0*00 




L IMVL2 




9/94 


0414 


A 4 K 4 
0 H 9 4 




LI MVL2+1 




575"* 


A 91 "*) 
0 410 


A ^ (71 A 

0 0 10 0 




T I OTK4 + 2 




57 54 
9 / 9H 


A9 1 4 
04 1H 


AK m 7 
09 100 




BCD2 




57 55 


04 19 


09 0*1 




BCD2 *1 




=57 5A 
J f jO 


A9 1 A 
04 io 


At? oik 
09 |09 




BC U2 +2 




9 / 9 / 


A 9 1 7 
041 / 


A R (71 A 
0 9|0 0 




0 r» n 0 j. "7 

B CD 2 ♦ 3 




3 / 0 10 


A 9 Q M 
0 C 4 Y) 


0 9 0 7 








5 7 A 1 


A 9 9 1 
O 44 1 


A 4 K 7 
O H 9 / 




LIMVL3 




3 / 0 c 


A 9 'J 9 

0 4 4 4 


OH 010 




LIMVL3 + 2. 




57a - *: 


A 9 9 
O £ £ O 


01 4 «( K 
10 H x 9 




EL0DV2 




57 A4 


A9 94 


01 4 1 A 
I0H 10 




C* LI ? ft 

EH I D V2 




57 A5 


A 9 9 5 
04 49 


A ~K (71 "7 
OO0/ 




T I b T n 2 *o 




J / DO 


A O 9 A 
0 4 £0 


00 10 




T I S TR2 *4 




57A7 


A 99 7 
Oct/ 


O H 9 9 




L IMVL2 + 2 




57 7 01 


A9 "?0I 
0 4 OlO 


A < 1 1 

0011 




T I ST R3 


/DEVICE 3 


K771 
9 / / 1 


A 9 "< 1 
0 £ 0 X 


0ol4 




T I STR3 + 1 




5 7 7 'J 
9 / / 4 


A r J "X "J 


0 h 9 / 




L IMVL3 




9 / / 0 


OtOO 


0 H 0 0 




LIMVL3*1 




5 7 7 4 
•J / / H 


A "3 X 4 

o 4 o h 


A "< 1 7. 
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T T CTD7xn 

T I ST R3 + 2 




C77C 
9 / / 9 


Oc 09 


0910 




BCD3 




5 7 7 A 


A o "I A 
0 C 0 0 


A H 1 i 
0911 




BC03+1 




5 77 7 
9 / / / 


A 9 "< 7 
0 CO f 


0 914 




BCD 5* 2 




□ 10 Id* 10 


A Q 4 01 
O4H0 


A U 1 "2 

0913 




BCD3*3 




A 17 (51 1 

0 it) lo 1 


6241 


6514 




BCD3+4 




A (71 (71 9 

00104 


Otic 
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L I MVL* 




A 01 01 *■ 
O 10 It) O 


A 9 4 X 


A. A C A 

0 *t 0 *> 




L I MVL4*1 




Am (714 

O 10 10 H 


A9 4 4 


01 4 4 01 
10 «t *> 0 




ELOD Vv5 




API (715 

O 10 10 -J 


A 9 4 5 


01 4 A 1 
10 *t «t 1 




r* LI f fti VI 7 

EH I D V3 




A 01 (71 A 

v 10 10 v 


A 9 4 A 


A S 1 4 
O O X " 




TlCTDtxl 
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A 01 171 7 
0 10 10 / 
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A X 1 C 

0 019 




T I S TR3*4 




ATM Pi 
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L 1 1 VL«5*4 




A P1 1 1 
o io x x 
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O C 9 X 
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0 0X0 




T I S TR4 


/DEVICE 4 


A 0! 1 9 
O 10 x c 


A 9 fci 9 
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001/ 




T I STR4+1 
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0 lO X 0 


0 4 9 0 


til 47. 
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L I MVL4 
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O IO X " 


A 9 4 
0 C 9 H 


A J A 4 
OH OH 




LI MVL4+1 
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O IO X j 


A 9 K K 
0 4 9 9 


A O 01 

00 40 




T I STR4+2 
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O IO X 0 


A 9 R A 
04 90 


A K 1 K 

0919 




BCD4 




A 011 7 
O IO x / 


0 4 9/ 


0910 




BCD4+1 




API 90) 

U IC £ u 
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0 c 0 10 


Am 7 

091 / 








A PI9 1 
O I0 4 X 


A 9 A 1 
0 40 X 


0 94 0 
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BCD4+3 




A Ol 9 9 


A 9 A 9 
0 4 0 4 


0941 




BCD4+4 




A 01 0 X 


0 4 0 0 


A 4 £. "7 
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A PI 9 4 
O IO £ 1 


A 9 A 4 
O 4 O H 


A 4 7 01 
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A9 A 
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PI 4 A 
10 H 0 0 








API 9 A 
u io c o 


A9 A A 
04 0 0 


014 A/l 
10H OH 
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A PI 9 7 
O 10 4 1 


A 9 A 7 
0 4 0/ 


0041 




T T Cf D/ xt 




A (71 X 01 
OI0 010 


A O 7 01 


00 44 
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O IO w X 


A 97 1 
0 4 / 1 


A 4 A K 
O HO 9 
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/ T a 0 1 r 
/ 1 ABLE 


OF VALUES FOR 


GO ROUTS 
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/ e pep 


UE V I LE 




API 4 

O IO 0 H 


A 9 7 'J 
04/4 


01 01 f7l <t 

10001 


T T C T □ (A 
T I 3 TK0 | 
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/SALO 


A Ol '< 5 
O IO 0 3 


A 9 7 '< 
0 4/0 
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10 0 0 4 
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/SAH I 


0 10 0 o 


04/7 


(71 M /X < 
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/SELECT WD 


0 100 / 
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M rji n a 

0004 
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/•SAM FREQ 
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0 10 H k3 


A O "7 A 
64/O 


01 m /i c 

0009 
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/-SAM FREQ 


A (A A i 
0 10 Hi 


0 4// 


M (/ <n h 
0001 


T I STR1 $ 


1 


/DV1 




0 s3 It) 0 


0002 




2 




6043 


A301 

U y f 1 


0003 




0 




6044 


6302 


0004 




4 




6045 


6303 


0005 




5 




6046 


6304 


0001 


T I STR2 » 


1 


/DV2 



6047 6305 0002 2 

6 05 0 6 30 6 0 003 3 

6051 630 7 0004 4 

6052 6310 0005 5 

6053 6311 0001 TISTR3, 1 /0V3 

6054 6312 0002 2 

6055 6313 0003 3 

6056 6314 0004 4 

6057 6315 0005 5 

6060 6316 0001 TISTR4, 1 

6061 6317 0002 2 
6 062 632 0 0003 3 
6063 6321 0004 4 ! 
60 64 63 22 0005 5 

6065 /TABLE OF AtiOR FOJR GO VALUES 

6066 /6 PER DEVICE 

6067 6323 0312 TIAO0, LOCW 
60/0 6 324 0311 HIOV0 
6071 63 25 006 6 SfeU&Vfc*' 
6 0 72 6 326 0307 SF'DVfi^ 
6073 632 7 0310 KSFDW 
60 74 6330 0313 OSDV0? 
60 7t> 6331 0334 T I AO 1 # LODVl 
60 76 63 32 03 33 HIDV1 
60 77 6333 0067 SELOV1 

6100 6334 0331 SFDV1 

6101 633 5 0332 KSF'QVl 

6102 6 336 0335 OSDV1 

6103 6337 0413 TIA02, L00V2 
610 4 6 34 0 0412 HI0V2 

6105 63 41 00 70 SELDV2 

6106 6 34 2 0410 SFDV2 

6107 6343 0411 KSFD V2 

6110 6 34 4 04 s 14 0S0V2 

6111 6 34 5 0 436 T I A Q 3 > L00V3 

6112 6 346 0435 H I DV3 

6113 63 4 7 0071 SELDV3 

6114 6 350 04"3# SPDV3 

6115 6351 04 34 KSFDV3 

6116 6 352 0 4 37 OSOV3 

6117 6353 0461 TIA04, L00V4 ; 

6120 6 35 4 0 46 0 HH10V4- 

6121 6355 0072 S'CLOV* 

6122 6356 0456 SFDV4 

6123 63 57 0457 KSFDV4 
612 4 6 3 60 0462 US0V4' 

6125 /A DDR OF St ART W EACH T ABi,E 

6126 /FOR GO ROUTS 

612 7 63 61 6272 VAI.TAB, TlSTRtf 

6130 6 362 627 7 TISTRl 

6131 6363 6304 T ISTR2 

6132 6364 6311 T I STR3- 

6133 63 65 6316 TI STR4 

6134 6366 6323 ADRTA'B # T I AD0 

6135 63 67 63 31 T I AD1 

613 6 6 37 0 6337 TIAD2 
6137 63 71 6345 T J AD 3 

614 0 6372 6353 TfAD4 

6141 /TTY QUE HOLDS 2# MESS AD#ti ffitit 

614 2 63 73 0001 STRQUE » i 

6143 63 74 0002 2 

6144 6375 0003 3 

6145 6376 0004 4 
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6377 


0005 
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6147 


6 400 
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6150 
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6402 


0010 
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6403 


0011 
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6153 


6404 


0010 
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6154 


6405 


0011 
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6155 


6406 


0012 




12 




6156 


6407 


0013 




13 




6157 


6410 
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6160 


6411 
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6161 


6412 


0016 




16 




6162 


6413 
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17 




6163 


6414 


0020 




18 
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6415 


0021 
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6165 


6416 


0020 


ENDQUE, 
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/TABLES 


FOR SCOPE 


ROUT INES 


6167 










/POWERS OF TEN 


6170 










/FOR OCTAL TO 


6171 










/DECIMAL 


6172 










/CONVERSION 


6173 


6417 


7747 


RADVALi 


7747 
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6174 


6420 


4540 




4540 




6175 


6421 


7775 




7775 


/-10, 000 


6176 


6422 


4360 




4360 




6177 


6423 


7777 




7777 


/-l #000 


6200 


6424 


6030 




6030 


6201 


6425 


7777 




7777 


/-100 


6202 


6426 


7634 




• 144 


6203 


6427 


7777 




7777 


/«10 


6204 


6430 


7766 




-12 




6205 


6431 


7634 




-144 


/«100 


6206 


6432 


0144 




+ 144 


/ + 100 


6207 


6433 


7766 




-12 


/-10 


62 10 


6434 
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♦ 12 


/♦10 


6211 










/HOLDS BCD VAL 


6212 










/OF X COORD 


6213 


6435 
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BCOVAL# 


0 


/100K 


6214 


6436 


0000 




0 


/10K 


6215 


6437 


0000 




0 


/IK 


6216 


6440 


0000 




0 


/100S 


6217 


6441 


0000 




0 


/10S 


6220 


6442 


0000 




0 


/UNITS 


6221 










/DEVICE INFO 


6222 










/TABLE FOR 


6223 










/XYGET SETUP 


6224 










/AT QANDA STAGE 


6225 


6443 


0000 


UMVL0I 


0 


/-ST ADOR DV0 


6226 


6444 


00 00 




0 


/LO, HI 


6227 


6445 


0000 




0 


/« SAM FREQ DV0 


6230 


6446 


6471 




BCD0 


/ ADDR OF BCD 


6231 










/VAL FOR DEV 0 


6232 


6447 


0000 


LIMVLl* 


0 


/DV1 ARGS 


6233 


6450 


0000 




0 




6234 


6451 


0000 




0 




6235 


6452 


6476 




BCD1 




6236 


6453 


0000 


LIMV12, 


0 


/DV2 ARGS 


6237 


6454 


0000 




0 




6240 


6455 


0000 




0 




6241 


6456 


6503 




BCD2 




6242 


6457 


0000 


LIMVL3, 


0 


/DV3 ARGS 


6243 


6460 


0000 




0 




6244 


6461 


0000 




0 





62 45 


64 62 


6510 




BCD3 




6246 


6 463 


mm 


LIMVL4 


> 0 


/DV4 ARGS 


624 7 


6 464 


0000 




0 


6250 


64 65 


0000 




0 




6251 


6466 


6515 




BCD 4 




6 252 


646 7 


0000 


LIMVL5 


# 0 


/I St UNUSED 


6253 


6470 


0000 




0 


/BUFFER CORE 


625 4 










/UOC COMES 


6255 










/RIGHT AFT LAST 


6256 










/USER DEFINED 


6257 










/DEVICE 


6260 


6471 


0000 


BCD0 $ 


0 


/HOLDS USER 


6261 


6472 


0000 




0 


/DEFINED I NIT 


6 262 


64/3 


0000 




0 


/X VALUE 


6263 


6474 


0000 




0 


/5 DIGITS 


6264 


6475 


0000 




0 


/l EACH DV 


6265 


6476 


0000 


BC01 1 


0 


/UNI TS 


6266 


6477 


0000 




0 


/TENS 


6267 


6500 


0000 




0 


/HUNDREDS 


6270 


6501 


0000 




0 


/THOUSANDS 


6271 


6502 


0000 
0000 




0 


/10 THOUS 


6272 


6503 


BCD2 , 


0 


6273 


6504 


0000 




0 




6274 


6505 


0000 




0 




6275 


6506 


0000 




0 




6276 


6507 


0000 




0 




6277 


6510 


0000 


BCD3, 


0 




6300 


6511 


0000 




0 




6301 


6512 


0000 




0 




6302 


6513 


0000 




0 




6303 


6514 


0000 




0 




6304 


6515 


0000 


BCD 4, 


0 




6305 


6516 


0000 




0 




6306 


6517 


0000 




0 




6307 


6520 


0000 




0 




6310 


6521 


0000 




0 




6311 


6522 


6567 


NUM0 , 


MS 0 


/NUM TAGS 


6312 


6523 


6573 


NU Mi » 


MSI 


/MUST BE 


6313 


6524 


6577 


NUM2 i 


MS: 2 


/CON TI GUOUS 


6314 


6525 


6603 


NUM3, 


Wf;3 




6315 


6526 


6607 


NUM4 , 


MS 4 




6316 






/TJSA 


MESSAGES 




6317 


6527 


0310 


MSHLT « 


310 


/H 


6320 


6530 


0301 




301 


/A 


6321 


6531 


0314 




314 


/L 


6322 


6532 


0324 




324 


/T 


6323 


6533 


0240 




24 0 


/SPACE 


6324 


6534 


0311 




311 


/ 1 


6325 


6535 


0316 




316 


/N 


6326 


6536 


0323 




323 


/S 


6327 


6537 


0324 




324 


/ T 


6330 


6540 


0322 




322 


/R 


6331 


6541 


0325 




325 


/U 


6332 


65 42 


0315 




315 


/M 


6333 


6543 


03 05 




305 


/| 


6 33 4 


6544 


0316 




316 


/N 


6335 


6545 


0324 




324 


/T 


6336 


6546 


0240 




240 


/SPACE 


6337 


6547 


0000 




0': * 


/EDM 


6340 


6550 


0307 


MSGQ, 


307 


/G 


6341 


6551 


0317 




317 


/O 


6342 


6552 


02 40 




240 


/SPACE 


63 43 


6553 


0311 




31 i 


/! 



6344 


6554 


0316 




316 


/ IN 


6345 


6555 


0323 




323 

w C O 


/ o 


6346 


6556 


0324 




324 

O C "t 


/ T 


6347 


6557 


0322 

w »J c c 




322 
o c c 


/ n 


6350 


6560 


0325 




325 

OC J 


/II 


6351 


6561 


031 5 




31 5 
OX 3 




6352 


6562 


0305 




30 5 
Of > 


/r 
/ t. 


6353 


6563 


0316 




316 


/N 


6354 


6564 


0324 

V W Cm ~ 




32 4 


/T 
/ I 


6355 


6565 


02 4 M 

10 C "f 10 




5 4 01 


/cd a n c 
'or At»t 


6356 


65 66 


00 00 




0 
10 


yr flu 


6357 


6567 


02 AO! 

IV c O 10 


M Q 0 . 
now i 


9 A0 
C OKI 


6360 


6570 


0215 

■v c x 




21 5 
c x J 




6361 


6571 


0212 

10 £ X £ 




91 o 




6362 


6572 
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0 

10 




6363 


6573 


0261 


MSI • 

1 1 O X 1 


2ft1 

C O X 




6364 


6574 


0215 

10 t X ✓ 




21 5 




6365 


657 5 


021 2 
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la 




6367 


ft577 


02 ft2 


MS9 . 
nasi 


9 ft 9 




6370 


6600 


0215 

lw X 




215 

C X J 




6371 


6601 


0212 




212 




6372 


6602 
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6373 


6 60 3 
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0215 
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6606 


0000 

10 10 10 10 




0 

10 




6377 
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0264 
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6610 


0215 




21 5 
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6401 


6611 


0212 




912 

CXC 




6402 


6612 


0000 




0 




6 40 3 


6 613 
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njnw 1 i 


315 


/ M 

/ rl 


6404 


6614 


0317 




31 7 

OX' 


✓ n 
f U 


6405 


6615 


0324 




32 4 
o c *t 


/ 1 


64 06 


6616 


0311 




31 1 

O X X 


/ T 


6407 


6617 


0317 




317 
o x f 


f u 


6410 


66 20 


0316 




31 6 
o x w 


/M 
/ IN 


6411 


6621 


0215 




21 5 
C Xj 


/ P D 
/UK 


6412 


6622 


0212 




21 2 

CXC 


/ L r 


6413 


6623 


0 000 




0 


/rnu 


6414 


6624 


0306 


MSFR . 


30 ft 

O 10 U 


f r 


6415 


662 5 


032 2 




322 
w c c 




6416 


662 6 


0305 




305 

O KJ J 


/ c. 


6417 


6627 


0305 




305 

w 10 J 


/ t. 


6420 


6630 


0332 




33 2 


/ c 


6421 


66 31 


0305 




305 

O I0 J 


' fc. 


6422 


6632 


0215 




21 5 

C X J 




6423 


6 63 3 


021 2 

f C X c 




219 
c Xc 




6424 


6634 


0000 

tW 10 10 10 
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6425 


6 63 5 


031 6 
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n o w u n t 
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O X D 


/ IN 


6426 


6636 


031 7 




31 7 
OX/ 


/ U 


6427 


6637 


0322 




3 2 2 

Oct 


/R 


64 30 


A 640 

\J V ~ <1 


0 3 1 5 
I0 O X 3 




0X9 


y m 
/ n 


6431 


6ft4 1 

u u ~ X 


0301 

10 <J 10 X 




301 
OI0X 




6432 


6642 


0314 

10 O X "t 




31 4 

O X *i 


/l 


6433 


664 3 


0215 




215 

C JL 


6434 


66 4 4 


0212 




212 




6435 


6645 


0000 




0 




6436 


6646 


0311 

10 v X X 


MS T N V . 


31 1 
O X X 




6437 


6647 


0316 




316 


/N 
r 1 1 


6440 


6650 


0326 




326 


/V 


6441 


6651 


0305 




305 


/E 


6442 


6652 


0322 




322 


/R 



64 4 3 


6653 


03 24 




-if 4 


/T 


6 44 4 


6 65 4 


0305 




3$4 


7E 


64 45 


6655 


0304 




/D 


64 46 


66 56 


0215 




_ _ 
215 




644 7 


6657 


0212 




212 




6450 


6660 


.00.00 




0 




64 51 


66 6 1 


03 20 


A LIMIT, 




>P 


6 452 


6662 


0 30 1 




301 


/A 


6453 


6663 


0325 






/u 


6 454 


6 66 4 


0 323 




3 23 


/s 


6 455 


6665 


0305 




305 


/E 


6456 


66 6 6 


024 0 




24'0 


7SP 


6457 


66 67 


0315 




315 


/M 


64 60 


66 70 


0317 




317 


/O 


64 61 


6671 


0304 




304 


/D 


64 62 


6672 


0 30 5 




I3#5 


/£ 


6463 


6673 


02 15 




215 




6464 


66 74 


0212 




212 




64 65 


6675 


0000 




•0 




64 6 6 


66 7 6 


03 10 


MSBUS Y , 


3l;0 


/H 


64 67 


66 77 


03 '01 




301 


/A 


6470 


67 00 


0316 




316 


/N 


64 71 


6701 


03 04 




30-4 


/D 


6 4 72 


6 702 


0323 




323 


/S 


6473 


6703 


0240 




24^0 




64 74 


6704 


0317 




31> 


70 


6 4 75 


6705 


030 6 




30« 


/F 


6476 


6706 


0306 




306 


/F 


6477 


67 07 


0215 




21 5 




6500 


6710 


0212 




212 




6501 


6711 


0000 




0 




6502 


6 712 


0301 


MSAD, 


301 


/A 


6503 


6713 


0257 




257 


// 


6 50 4 


6714 


0 30 4 




304 


7% 


65 05 


6715 


02 40 




24,0 




6506 


6716 


0 31 5 




315 


/M 


65 07 


6 717 


0317 




317 


/o 


6510 


6720 


0304 




304 


/o 


6511 


6721 


0305 




305 




6 512 


6 7 22 


0215 




215 




6513 


6723 


0212 




212 




6514 


6724 


0 00 0 




0 




6515 


6 7 25 


0000 


A A AS 3 , 


0 




6516 








LMODE 




6517 








»1000 
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Digital Equipment Corporation maintains a continuous effort to improve the quality and usefulness of its 
publications. To do this effectively we need user feedback - your critical evaluation of this manual. 

Please comment on this manual's completeness, accuracy, organization, usability, and readability. 



Did you find errors in this manual? 



How can this manual be improved?. 



DEC also strives to keep its customers informed of current DEC software and publications. Thus, the following period- 
ically distributed publications are available upon request. Please check the appropriate boxes for a current issue of the 
publication(s) desired. 

O Software Manual Update, a quarterly collection of revisions to current software manuals. 
O User's Bookshelf, a bibliography of current software manuals. 

O Program Library Price List, a list of currently available software programs and manuals. 



Please describe your position. 



Name Organization 

Street Department . 



City State , Zip or Country 
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Digital Equipment Corporation 
Software Information Services 
146 Main Street, Bldg. 3-5 
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HOW TO OBTAIN SOFTWARE INFORMATION 



Announcements for new and revised software, as well as programming notes, software problems, and documenta- 
tion corrections are published by Software Information Service in the following newsletters. 

Digital Software News for the PDP-8 Family 
Digital Software News for the PDP-9/1 5 Family 
PDP-6/PDP-10 Software Bulletin 



These newsletters contain information applicable to software available from Digital's Program Library. 



Please complete the card below to place your name on the newsletter mailing list. 

Questions or problems concerning DEC Software should be reported to the Software Specialist at your nearest DEC 
regional or district sales office. In cases where no Software Specialist is available, please send a Software Trouble 
Report form with details of the problem to: 

Software Information Service 
Digital Equipment Corporation 
146 Main Street, Bldg. 3-5 
Maynard, Massachusetts 01754 

These forms, which are available without charge from the Program Library, should be fully filled out and accompa- 
nied by teletype output as well as listings or tapes of the user program to facilitate a complete investigation. An 
answer will be sent to the individual and appropriate topics of general interest will be printed in the newsletter. 

New and revised software and manuals, Software Trouble Report forms, and cumulative Software Manual Updates 
are available from the Program Library. When ordering, include the document number and a brief description of 
the program or manual requested. Revisions of programs and documents will be announced in the newsletters and 
a price list will be included twice yearly. Direct all inquiries and requests to: 

Program Library 
Digital Equipment Corporation 
146 Main Street, Bldg. 3-5 
Maynard, Massachusetts 01754 

Digital Equipment Computer Users Society (DECUS) maintains a user Library and publishes a catalog of programs 
as well as the DECUSCOPE magazine for its members and non-members who request it. For further information 
please write to: 

DECUS 

Digital Equipment Corporation 

146 Main Street 

Maynard, Massachusetts 01754 
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My computer is a PDP-8/I □ 

LINC-8 O 
PDP-9 □ 
PDP-IO □ 

My system serial number is 



(zip code) 

PDP-8/L O 
PDP-12 Q 

5 Please specify 
OTHER □ ■ 

(if known) 
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Software Information Services 
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Maynard, Massachusetts 01754 




